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Preface 


The TSC Debug Package is a very powerful tool for assembler 
language program debugging. It offers the power and flexibility 
of an expensive hardware emulator at only a very small fraction 
of the cost! Used with care, this package will save many hours 
when debugging programs. 


it is recommended that the entire user's manual be _ read 
before attempting any serious debugging. The ‘Tutorial! is 
written to provide a fairly complete introduction to the Debug 
Package, while the "Command Descriptions! is a very complete and 
concise description of all Debug features and commands. Consul t 
'Getting Debug Running! for. details on how to get the program 
started. Working through the example given in 'Example Use! is a 
good place to start once the manua! has been read. 


-iv- 


Debug Tutorial 


I. Introduction 


Program debugging is usually thought of as work. It should 
be thought of as an art. There is no reason for a lot of crying 
while attempting to make a new program do what was’ intended. 
This is only true, however, If the program was designed with some 
forethought and planning. Computer programs are executed in a 
logical, step by step, fashion. This is the approach both 
program writing AND debugging should take, So many times a 
programmer will spend hundreds of hours, carefully planning the 
flow of a new program but spend only a few minutes thought on a 
debugging approach. The debugging is usually attempted in some 
hap hazard, keep your fingers crossed, method. Sometimes this 
works and sometimes it does not, but in most cases, valuable time 
is wasted. 


By using a debugging tool and by incorporating some logical 
thinking, program debugging can become very straight forward and 
sometimes even fun! The purpose of this tutorial fs to introduce 
the reader to the capabilities of the TSC Debug Package and offer 
some suggestions on how to. tackle those program bugs. The 
following sections give a more detailed description of its 


capabilities. 


11. The Simulated Computer 


The TSC Debug Package is more than the name may imply. It 
is In fact a complete 6800 simulator. A computer simulator is a 
program which: when run, behaves exactly like the computer if is 
simulating. Given 6800 machine language, the simulator will 
perform the instructions exactly like the 6800 CPU. There are 
two major differences, one being an advantage, the second being a 
disadvantage. First for the good news. The simulator has the 
ability to keep close account of al! internal actions. For 
example, any ittlegal opcodes are quickly detected and reported. 
Such things as stack overflow and underflow are also easily 
checked. Each byte of memory may have an assigned protection type 
such as write protection. Genera! conditions may also be spotted 
such as the occurence of a transfer of address type instruction. 
Overall, the simulator can keep close watch over the executing 
program and detect any peculiarities. 


This all sounds great, but as stated before, there is a 
disadvantage in the simulator, namely speed. The simulated 
program runs somewhere between 100 and 300 times slower than a 
reat 6800 CPU. This means that real time dependent code may not 
be simulated. This is not a serious drawback since less than one 
percent of all computer programs are real time dependent. 
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The 6800 simulator incorporated in the TSC Debug Package 
supports all of the 6800 instructions. All of the user registers 
are also provided (A, B, CC, X, PC, and SP). To’ examine the 
contents of these registers it is only necessary to type R 
followed by a carriage return. This is assuming the Debug 
Package is ready to work indicated by the two asterisk prompt 
('**!), Typing the R command will cause the debugger to display a 
line containing all register names followed by their contents in 
hex. At the end of the line is the instruction currently being 
pointed to by the program counter (P register) and it is 
displayed in disassembled form (standard Motorola mnemonics). A 
nonstandard register is also displayed, the N register. This 
register's value represents the subroutine nest depth. Each time 
a subroutine is called, its value will be incremented, and each 
time a return from subroutine is executed, its vatue will be 
decremented. The contents of any of the displayed registers may 
also be set by using the SET command. For example: 


**SET,P=100,A=F3 


will set the value of the PC to hex 100 and the value of the A 
register to hex F3. There are several other registers and states 
of the simulated machine. These can be viewed by typing MACH. 
The items displayed with this command are primarily the states of 
various traps which will be described a little later. 


There are several other internal machine variables which may 
be easily examined. One of these is the contents of the stack. 
Typing STACK will display the top several bytes of the stack. If 
more stack contents are desired, simply type the number of items 
desired after the command. 


**STACK, 15 
This will display the top 15 bytes of the stack. Note that a 
comma was used as a separator in the command line. It will be 
used in all examples in this manual but a space is also 
acceptable and sometimes easier to type. Another command = which 
references the stack is the RET command. This wil! print the top 


two bytes of the stack as an address and represents the return 
address if currently in a subroutine, 


The simulated machine always keeps track of where it has 
been and how much time was spent there. The machine 'states 
counter! is used to tally the total number of machine states or 
cycles used so far by the executing program. Each 6800 
instruction requires a certain number of machine cycles to 
execute. If the CPU is running at 1 megahertz, each machine state 
is equivalent to 1 microsecond. The machine states counter is 
capable of counting up to 99,999,999 cycles, or roughly 99.99 
seconds of actual program execution time. This counter is useful 
for determining the exact execution time of a routine. 


TSC Debug Package 


The TRAIL command will print the address of the last 
transfer type instruction. A transfer of address instruction is 
one which causes the CPU to change its normal course of 
instruction execution, Normally instructions are executed in a 
sequential fashion, stepping through memory sequentially. A  JMP 
instruction for example will cause the next instruction to be 
fetched from the address specified in the instruction, rather 
than from the next sequential address. In effect, we have a 
transfer of address. The TRAIL command will print the location 
of the last transfer type instruction that was executed. This is 
very handy in determining what caused a program to end up in 
memory where it did. 


The simulated machine is capable of running in two different 
modes. These are referenced as mode 1 and mode 0. In mode 1 
(the default mode), all checking and bookkeeping is performed. 
In mode 0, several of the features are turned off in order to 


improve the speed performance of _ the simulator. It is 
recommended that mode 1 always be used since it does the most 
work for you and will catch more errors, 


hit. Whats in Memory? 


Now that the simulated CPU has been described we need to 
look at memory. The TSC Debug Package offers several! ways of 
examining the contents of memory locations, as well as altering 
them. The simplest form is the MEM command, or M for short. 
Typing M followed by an address wil! display that byte of memory. 
For example: 


**¥M, 100 
100 CE 


shows that memory location hex 100 contains a hex CE. At this 
time several choices are at hand. If all you wanted to do was 
check the contents of location 100, simply type a carriage return 
and the debug prompt wil! be issued. If you want to change the 
contents of 100, simply type the new value followed by a ‘space’, 
The ‘'spacet tells the debugger that the new value is ready to be 
entered. It is only necessary to type the significant digits of 
the new value to be entered. For example, if 6 was to be 
entered, simply type 6 followed by a space. It should be noted 
that only the last two digits will be used so if 'C23A' is typed, 


‘3A! will get entered. If zero is to be entered, simply type a 
space. After the new value is entered, the next sequential memory 
location will be displayed. Any time a non hex chcracter is 
typed (with the exception of space), one of two actions will 
occur. First if the character is a ttine feed', the previous 
tocation will be displayed, with the current location left 
unchanged. If the character is any other non hex character, the 
next location. will be displayed leaving the current unchanged. 
An example will clarify the M command's use. 
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**M, 100 
O100 CE . 
0101 3A 46 
0102 4D 


Location $100 was left unaltered, while location $101 was changed 
from a $3A to $46. Finally this mode was exitted on the next 
line by typing a return. 


Many times while program debugging it is desirable to 
examine a large block of memory. The DUMP command is used for 
exactly that. This command will display 16 lines of data, 16 


bytes per line, for a specified memory region. Each byte is 
displayed as a hex value as well as its ASCII equivalent. All 
control characters (those bytes having a value less than 20 hex) 
are displayed as an underscore character ! !, To display 256 


bytes starting at memory location $1000, the following command 
should be typed: 


**DUMP, 1000 


At the end of the dumped block the program will stop and wait for 
a character to be _ typed. Typing an 'Ft wil! move forward in 
memory, printing the next sequential 256 bytes. In this example, 
typing an F would display the block starting at $1100. It is 
also possible to display the previous block of 256 bytes by 
typing a 'Bt, for backward movement. A carriage return will 
cause the debugger to regain control and the prompt will be 
reissued. Any other characters will be ignored. It should be 
noted that any time the debugger is displaying data on the 
terminal, the display may be stopped at the end of the line by 
typing an 'tescape! character. Once stopped, another ‘escape! 
will resume the display, while a 'return! will give control back 
to the debugger. This is a very convenient feature. 


Another useful memory interogation command is the FIND 
command which is used to find a specific string of bytes or 
characters in a selected block of memory. As an example, suppose 
there was a jump to subroutine instruction somewhere in your 
program. It is known that the code is BD 34 00, and that it is 
somewhere between locations $100 and $300. The following command 
line will find it. 


*¥*F IND, 100,300,BD, 34,00 


This tells the debugger to look between memory locations hex 100 
and 300 for the hex string 'BD3400'. AI! memory locations which 
contain this string will be displayed on the terminal. The 
length of the string searched is !imited by the maximum command 
line length which is 80 characters, It is also possible to 
search for an ASCII string. Suppose it was necessary to find the 
character string 'ERROR 3! in memory. it should be somewhere 
between locations $200 and $1000. This can be done in the 
following way: 
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**FIND,200,1000,"ERROR 3 


The double quote character tells the find command that the 
following characters are to be considered ASCII characters 
instead of hex. Otherwise the command works exactly as described 
above, 


So far the memory commands described have been oriented 
toward hex and ASCII values. Many times during debugging it is 
necessary to decode these hex values into assembler language 
instructions. The DIS command does exactly that! This command is 
a complete program disassembler which allows the user to examine 
the contents of memory in a higher level form. Each memory 
location in a specified block will be printed as address, 
followed by the opcode mnemonic and addressing mode. Standard 
Motorola mnemonics and addressing mode designators are used. To 
use the disassembler, simply type the command name (DIS), 
followed by two address boundaries. For example, to disassemble 
the memory range between locations 100 and 108, type the 


following. 


**D1S, 100, 108 
0100 LDAA $32 
0102 STAA $0240 
0105 BNE $0121 
0107 DECA 

0108 STAA 2,X 


Remember that at any time the display is being produced, the 
'escape' key may be typed to temporarily halt the action. The 
DIS command is a very useful and powerful command. 


Now that we can examine memory in a higher level form it 
would be nice if we could alter it in the same way, that is, 
using assembler language mnemonics. The ASM command does exactly 
that! {tt acts as a line at a time assembler, allowing standard 
mnemonics and addressing modes to be typed, while the 
corresponding hex values are automatically inserted into memory. 
To start this process simply type the command name followed by 
the address where the code should be placed. The debugger wil! 
respond by printing the address of the tocation specified 
followed by a space. At this time, simply type the desired 
instructions following each with a carriage return. The next 
available address will then be printed and assembly can continue. 
Typing a carriage return in response to tne address prompt wil | 
exit this mode of operation, To show the workings of this 
command, some code will be assembled at location $200. 


**ASM, 200 
0200 LDAA 10 
0202 LDAB $10 
0204 PSHA 
0205 LDAA '™ 
0207 STAA 0,X 
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0209 JMP $3000 


020C 
¥% 


Note that numeric values are interpreted as decima! unless 
preceded by a dollar sign ($) to designate hex. it is also 
possible to enter an ASCII constant by preceding it with a single 
quote ('). No spaces are allowed between the register specifiers 
"A' or 'Bt and the instruction (e.g. LDAA is correct, LDA A is 
not). The ASM command is a great time saver! 


iV. Simulating the Program 


Program simulation is very simple. if the test program 
starts at $100, simply type START,100 to start the simulation 
process. The program will run exactly as the CPU would run it, 


just slower, The START command clears several of the machine 
conditions such as the states counter. To start a program where 


it left off, the GO command can be used. This will cause the 
program to start execution at the location pointed to by the 
program counter (P register). No states will be cleared. 


A very valuable feature of the simulator is the 'trace 
mode!, When trace is enabled, a register dump (exactly like that 
produced by the R command) will be displayed after each 
instruction is executed. The simulation may be temporarily 
halted by typing an 'escape! character anytime during the tracing 
operation. The simulation may also be «stopped by typing a 
‘control Ct. This will cause the debug prompt to be reissued. 
To enable the trace mode use the TRACE command. 


*¥*TRACE=10 


This line will cause the debugger to trace all instructions which 
are in a subroutine nest level of 9 or tower. The number in’ the 
command line specifies the nest level where tracing should be 
disabled. This allows only the outermost program structure to be 
traced if desired, while the deeper subroutines will be simulated 
without the tracing. To disable the trace, use a count of zero 


(e.g. TRACE=0). 


There are several other methods of starting program 
simulation. One is the SIM command. This command will altow the 
simulation of a specified number of instructions. Tracing is 
disabled during the execution of this command. 


**SIM, 100 


This line will cause 100 instructions to be simulated starting at 
the address pointed to by the program counter. The TSIM . command 
is identical to the SIM command except trace is automatically set 
to 256 during the execution of the command. 
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It is often desirable to step through the execution of a 
program, one instruction at a time. The STEP command will start 
simulation at the instruction pointed to by the program counter, 
execute a specified number of instructions, print a register 
dump, and then wait for input. At this time, a space will repeat 
the process, while a return will return control back to the 
debugger. The usual method of operation is 'single' step which 
will execute one instruction, then dump the registers. This mode 
can be entered by: 


**STEP 


Multiple instructions can be executed between register dumps by 
specifying a count. For example; 


S*STEP; 25 


will cause 25 instructions to be simulated at a time. The step 
mode is a very powerful method for closely following the flow of 


a program, 


During program execution, the simulator keeps track of the 
last 256 instructions executed. If a program ever goes off on 
its own, ending up in memory where it should not, the PAST 
command can be used to examine the Instructions executed to get 
it there. Typing the command, 


¥*PAST,20 
will display the addresses and mnemonic instructions of the last 
20 opcodes executed. This feature alone will find a good 


percentage of program bugs. 


V. Breakpointing the Program 


So far, methods have been described which allow all or a 
certain number of instructions to be simulated. Most of the 
time, the number of instructions to a certain point in the 
program is not.known. It would be helpful if a break in the 
program simulation could be specified to take place at a 
particular point in the program, or in other words, breakpoints. 
A breakpoint is a mechanism for stopping the execution at a 
specified address in the program. As an example, to set a 
breakpoint at location $23A, use the following command. 


*¥*B@23A 


As the program executes, any time location $23A is reached, 
simulation will stop and the registers will be dumped to the 
terminal. After the program has stopped, typing a 'G! will 
restart execution, starting at address $23A (the breakpoint wil! 
be temporarily ignored). !t should be noted that the method used 
“to create the breakpoint does not alter the contents of memory in 
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any way. This means that after setting a breakpoint, the 
contents of memory at the breakpoint ltocation will be unchanged. 
This allows breakpoints to be set in ROM as well as RAM! 


in the above example, the breakpoint caused two actions to 
take place. One was printing the registers, the other was 
stopping program simulation, These actions are the ones 
performed by most debugging systems. The TSC Debug Package 
allows six other actions to be performed upon the execution of a 
breakpoint. A list of all 8 possible actions follow: 


R,..Print register contents 
2. Z.e-Zero the states counter 
T..eEnable the trace function 
4. U..e-Disable trace (untrace) 
5. H..-Histogram counter 
6. M...Print a message 
7. JeeeJump to specified address 
8. S...Stop simulation 


The first breakpoint example shown defaulted to R and S_ type 
actions since none were specified. The Z action zeroes the 
machine states counter. This is useful for program timing. For 
an example, the states counter may be zeroed upon entry to a 
subroutine and a stop type breakpoint set at the exit point of 
the routine. By using the STATES command after the program 
stops, the exact number of executed machine states for that 
routine will be displayed. 


The T and U actions allow the trace mode to be enabled = and 
disabled at selected points in a program. When enabled, trace 


will be set to level 255. Many times, tracing is only desired 
during one routine or selected portion of the program. These 
actions will permit this sort of program tracing. A few examples 
will demonstrate action type breakpoints. 


**B,RZ@1000 


**¥B,T@A16 
The first command will set a breakpoint at location hex 1000 
which when executed will print the registers and zero the states 
counter. The program will then continue since a stop (S) - action 
was not specified, The second example will cause trace to be 


turned on at location hex Al6. 


Another action is the histogram (H). A histogram counter 
counts the number of times the instruction at that address has 
been executed, This is useful for determining 'hot spots! or 
sections of programs which are executed very frequently. By 
setting a histogram breakpoint at the first instruction of each 
subroutine in a program, it is possible to find out exactly how 
many times each routine was called. As an example, suppose there 
were three subroutines in a program, and they were located at 
$100, $123, and $1A0. To set histogram counters at these 
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locations, type the following commands: 


**B,H@100 
**B,H@123 
**B,H@1AO 


After simulating the program, typing HIST will display the totals 
of the counters at each address. This command is used to examine 
the histogram counters at any time. The CLH command Is used to 
clear the histogram counters. 


**CLH, 100 

**CLH 
The first command will clear (set to zero) the value of the 
histogram counter at location 100. The second command wil! zero 


all of the counters, The histogram commands allow a_=every 
complete profiling of a program, letting the user 'fine tune! if 
for maximum speed, 


The remaining two action codes are special purpose. One 
permits a selected message to be printed as the action, the 
second allows transfer of contro! to a specified address (like a 
JMP instruction). 


**B,M@325,SUB 1 
*¥*B,J@27C, 1000 
The first line will print the message "SUB 1" each time the 
instruction at $325 is executed. The second command will cause 
the instruction at address hex 1000 to be the next instruction 
executed. The instruction at 27C will not be executed! 
Any combination of action codes may be listed for a 


breakpoint. They are executed in the order they appear in the 
above list. For example, 


**B,TRZ@300 


will cause the registers to be displayed (R), the states counter 
to be zeroed (Z), and trace to be enabled (T), in that order. 
This ordering may be important, for in the actions 'RSJ', the 
stop (S) will never get executed since the J transfers control to 


another address. 


VI. Advanced Breakpoints 


Programs containing loops or recursion are often difficult 
to breakpoint since one particular section of code may be called 
thousands, or even millions of times. As an example, . suppose 
there is a loop in the program being debugged, and it is 
necessary to examine the contents of the X register after the 
600th time through the loop. One way is to set a breakpoint at 
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the desired instruction and start the program simulating. Every 
time the program halts at the breakpoint, type G to restart it. 
Repeat this process 600 times and you can examine X. You are 
probably thinking that this would take forever and you are right! 
The TSC Debug Package allows a pass counter to be associated with 
a breakpoint. This count determines how many times the 
instruction at the address of the breakpoint should be executed 
before the actions specified should be performed. In the above 
example, assuming the instruction to be breakpointed is at 
address 300, the following will do exactly what we want. 


**B@300, >600 
or 
**B,SR@300,>600 


Both commands are identical since the first defaults to SR 
actions. The '>' is the pass count modifier and shoutd be read as 
tafter'. The result of this command is to stop and print the 
registers on the instruction at lfocation 300, after 600 times 
through it. Once the count reaches 600 (or whatever value was 
set), the breakpoint actions will always occur. A second similar 
type of pass count uses a '<! for a modifier and should be read 
as 'before'. This is used to create a temporary breakpoint. 


**B,R@300,<100 


This command will set up a breakpoint at 300 which will print the 
registers for the first 100 times through. After the 100th time, 
the breakpoint will be cleared and no _ longer function. In 
summary, the pass count value associated with a breakpoint is 
decremented each time the instruction at the specified address is 
executed. If the modifier is a '>', no actions will be performed 
until tafter'! the count has reached zero. With the '<! mofifier, 
actions are only performed 'before! the count reaches zero, and 
once it is zero, the breakpoint is cleared. 


In the above example it was decided that the program’ should 
be stopped after 600 times through the loop. While debugging 
loops, it is not always possible to determine an exact number of 
times to execute the loop before it should be stopped. Often it 
is desirable to stop on a certain condition, such as the contents 
of a register or the state of a particular memory focation. 
Conditional expressions are allowed in breakpoint definitions and 
yield a great deal of power. The conditional can be determined 
on the contents of a selected register (A, B, C, X, P, S, or N) 
being equal (or not equal) to a specified value. A particular 
memory location may also be tested for zero or not zero. 


Following are a few examples. 
**B@1000,1F A=3F 
**B,R@320,1F B!=10 
**B,T@6A7,1F $20=0 


The ‘IF! statement designates the conditional part of the 


~10- 
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breakpoint definition. The first example will stop and print the 
registers at location hex 1000 but only when the value in the A 
accumulator is hex 3F. The second example will print the 
registers at 320 only if the contents of the B register is not 
hex 10 ('!=' is to be read as 'not equals’). The last example 
will enable the trace mode at location 6A7 if the contents of 


memory location hex 20 is zero. The dollar sign '$' is used to 
designate a memory reference and not a hex value (the value is 
always interpreted as hex). The value on the right of the equals 
sign must always be zero when a memory reference has been 


designated. 


The above breakpoint features may be combined in a variety 
of ways to produce an almost endless variety of breakpoints. AS 
an example; 


**B,TZ@1000,>100,1F X=100 


will cause trace to be enabled and the states counter to be 
zeroed, after executing the instruction at hex 1000, 100 times, 
but then only if the value of the index register is $100. It 
should be noted that the H, M, and J action codes will not allow 
a conditional expression as part of the breakpoint definition, 
and J will not support a pass counter. 


Once breakpoints are set it is possible to examine the 
loaction of them as well as remove them. To check the’ locations 
of breakpoints, use the BP command. 


**BpP 

**BP,100 

**BP, 100-500 
The first line will print the location of all breakpoints, each 
one followed by a list of its action codes. No pass counts or 
conditionals are displayed. The second example will display the 
action codes of the breakpoint at tocation hex 100 (if one 
exists). The last command line will disptay all breakpoints 


between location 100 and 500, inclusive. The CLB command is 
similar In syntax but is used to clear or remove a breakpoint. 
CLB by itself wil! clear all breakpoints. If it is followed by 
an address, the breakpoint at that address will be removed. If 
two addresses are specified, then al! breakpoints in their range 
will be cleared. 


While debugging very large programs, It may become quite 
time consuming to simulate the program up to a desired address. 
For example, a program which requires a minute to execute In real 
time may require over an hour if simulated. To get around this 
problem, it Is possible to set a 'real time' breakpoint. This-is 
entirely different from the previously described breakpoints in 
that it does modify the contents of memory (by substituting a JMP 
instruction) and no pass counting or conditionals are permitted. 
The only action performed is to stop and print the registers. An 


2{i= 
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example of use follows: 
*¥*RT,5A00 


This command will cause the CPU to start executing the program 
(NOT the simulator) at the current address of the program 
counter. When the program reaches the specified address (5A00), 
the program will stop, print the registers, and restore the 
contents of RAM at that location (remove the breakpoint). Since 
the program is being executed in real time and not being 
simulated, no other breakpoints, illegal condition checking, 
states counting, or record keeping is performed. This type of 
execution is not recommended for this reason and should only be 
used where the simulation time gets tremendously long. 


Vit. Protect Your Memory 


Perhaps the most aggravating aspect of program debugging is 
having your program destroy itself in memory. Too many times, 
programs 'run away', writing garbage in memory, usually exactly 
where it is not wanted. In these instances, it would be nice to 
be able to 'write protect! memory, or at least certain portions 
of it. The TSC Debug Package will allow exactly that! In fact, 
any section of memory, right down to a single byte, may be write, 
execute, memory, or simulate protected! Write protecting memory 


will prohibit any stores or writes into it. Execute protection 
prohibits opcodes from being fetched from memory. In other 
words, the program counter (PC) will not be permitted to point to 


a location of memory which is execute protected. Memory protect 
is a brute force type of protection. By memory protecting a 
region, you are in effect saying that no memory exists in this 
region and that nothing should be allowed to reference it in any 
way. Any memory referenced in conflict with its protection wil! 
cause the simulation to stop and an appropriate message will be 
printed. Finally, simulate protection is slightly different from 
the rest. It Its used to tell the simulator to execute any code 
in a Simulate protected region in real time, or in other words, 
not simulated. A restriction requires the code in a_ simulate 
protected region to be called as a subroutine (JSR or BSR) from 
the non-simulate protected code. This is very convenient for 1/0 
operations, All t/O routines can be simulate protected (such as 
TTY and disk routines) allowing them to be executed by the CPU 
(real time) and not the simulator. It is often convenient to 
simulate protect the entire region of memory containing the 
monitor and/or operating system since this code is _ known 
functional. Keep in mind that code in simulate protected memory 
may only be accessed via a subroutine call. 


The command used to set protection Is PROT. A few examples 
will demonstrate its use. 


js 
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**PROT, 100-3FF,X 
**PROT, 2E0,W 
**PROT, 500-6FF,M, 1200-1FFF,W 


The first example will execute (X) protect the memory between 
locations $100 and $3FF. The second tine write protects (W) 
location $2E0. The fast example will memory protect (M) 


locations $500 through $6FF and write protect $1200 through 
SIFFF. There are some general rules to follow when protecting 
memory. Memory protection should be used on all sections of 
memory not referenced or used by the program being debugged, 
especially the area of memory containing the Debug Package. This 
will keep a runaway program from clobbering something it should 
not. Sections of memory which are used for register storage or 
flags should be execute protected. Memory containing the actual 
program code should be write protected for obvious reasons. 
Finally, as mentioned above, the memory locations where the 
monitor and/or operating system reside should be simulate 
protected. 


Once the protection has been defined it may -be checked by 
using the BOUNDS command, This command will allow the 
examination of the boundaries of each type of protection. Either 
all types or selected ones may be displayed. 


**BOUNDS 
**BOUNDS, W,M 


The first example will display al! types while the second wil! 
show only the defined boundaries for write and memory protection. 
Memory protection can be cleared in a similar fashion. 


**CLP 
**CLP,X,W 


~The first command will clear all protection while the second wil 
only clear the defined execute and write protected regions. 


VItt. Trapping Those Bugs 


The previously described breakpointing feature al lows 
programs to be stopped at specific locations and on specific 
conditions. It is often desirable to 'trap' a program on _ some 
general condition such as every time a_ transfer of address 
instruction is encountered. The memory protection described 
above is a form of trap in that the program will stop if a 
protection violation is detected (e.g. writing into write 
protected memory). There is address information associated with 
this protection which makes it different from the general traps 
avallable in the Debug Package. The general traps cause programs 
to stop on a general condition which is not address dependent. 
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One of these traps is the {llegal opcode trap which is 
always enabled. Any time an illegal opcode is encountered during 
the course of program simulation, the program will stop and 
report its occurrence. A second, always enabled trap will stop 
the program if an RTS instruction is encountered and the current 


nest level is 0. 


There are several user controlled traps which may be enabled 
and disabled at will. The transfer trap is enabled with the XFR 


command, When enabled, the program wil! stop each time a 
transfer of address is encountered. These instructions are JMP, 
BRA, and alli conditional branches such as BCC. The subroutine 


calls and returns are not trapped out. 


**XFR=ON 

¥#*XFR=OFF 
These Two commands will enable and disable this’ trap 
respectively. Once a program has stopped because of a transfer 
trap, typing G will restart it, allowing the current transfer to 


be executed. This is very useful for quickly following the major 
flow of a program. Another one of the general traps allows 
halting the program if the subroutine nest counts reaches a 
specified level. 


*¥*NEST=20 


This will cause a trap if the nest level! ever reaches 20. ‘To 
disable the nest trap, use NEST=0. 


The last general trap to be discussed is the ITRAP. This 
command allows activation of the interrupt trap and will cause 
the simulating program to stop if an interrupt type instruction 
is encountered (SWI, RTI, and WAI). Since these instructions are 
not used in the majority of programs it is a good idea to use 


this feature. An example wil! demonstrate its use. 
** | TRAP=ON 
** | TRAP=OF F 
These two commands will enable and disable the interrupt trap 


respectively. 


IX. And There is Still More! 


There are still many undescribed features of the TSC Debug 
Package. One of these is the handy little CALC command which acts 
as a hex calculator. Typing CALC followed by a return will cause 


the debugger to output an equals sign (=) for a prompt. At this 
time hex and decimal addition and subtraction may be performed. 
To add two numbers simply type them in separated by a plus sign. 
!f the number is hex precede it with a dollar sign, otherwise the 
debugger will interpret it as decimal. Use a minus sign for 
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subtraction. It is also possible to do base conversions. This 
can be accomptished by entering just one number after the prompt 
(hex or decimal) followed by a return. All answers are displayed 
in both hex and decimal. An example follows. 


**CALC 
=$1A+10 
$0024 36 


$0100 256 


After entering the calculator mode, the numbers hex 1A_= and 
decimal 10 were added to give the result hex 24 or decimal 36. 
The second entry is a base conversion of the decimal number 256. 
The result shows its hex equivalent is $100. The calculator mode 
can be left by typing a return in response to the prompt. 


There are stil! many other features in the Debug Package, 
such as interrupt simulation, which have not been described. It 
is not the intention of this tutorial to teach all there is to 
know about the debugger, but to teach enough to make the user 
feel comfortable with the majority of its features. Once the 
materfal in this section is thoroughly understood, the following 
detailed command description should be studied in depth. 


Now that the basic mechanics of the Debug Package are 
understood they should be put to good use. Keep in mind that a 
logical and planned approach should be taken when debugging a 
program. Use the available tools such as memory protection and 
breakpoints. When first starting the debug process on a _ ~new 
program, start at the beginning, working your way through the 
flow of the program. Let the program be the guide. If you pay 
close attention, it will definitely point out the bugs. Above 
all, have patience. Great bugs are not killed overnight! 
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Command Descriptions 


le Introduction 


This section of the manual contains a detailed description 
of each Debug command. Each command is shown with a_e few 
examples. The syntax definitions show optional items in square 
brackets ([]). All command parameters are shown separated by 
commas for clarity in the syntax definitions and examples. Any 
place a comma is shown, a space may also be used. The following 
definitions apply throughout this document: 


Item Meaning 

<address> 1-4 digit hex value 

<value> decimal number (max = 255) 
<count> decimal number (max = 65,000) 


The Debug Package is ready to accept a command anytime the 
'**t prompt is present on the line. When typing commands, a 
"control H!' will cause a backspace, and delete the last character 
typed. A ‘contro! X' will cause the entire tine to be deleted 
and a new prompt of '??' will be output to show the deletion of 
the line. Any time text is being output to the terminal, display 
may be stopped at the end of a_ line by typing an 'escape! 


character. Once stopped, another ‘escape! will restart the output 
while a 'return' will give control back to the debugger and the 
'¥*'t prompt will be output. 


11. General System Control 


The general system control commands allow a variety of general 
actions to be performed. Register examination and changing is 
supported by use of the REG and SET commands. The status of 
several machine control registers can be obtained through the 
MACH command. Commands to view the stack contents, set 
simulation speed, reset machine parameters, enter a calculator 
mode, examine the 'machine states counter', and exit the debugger 
are all described in this section. 


C{ALC} 
PURPOSE: 
The calculator mode will be entered and a '=! prompt will 
be printed. The calculator wil! allow addition or 


subtraction of two numbers. The numbers may be hex 
(designated by a '$!' prefix) or decimal. If two numbers . 
are typed, they must be separated by a '-' or '+! and the 
appropriate result will be displayed. The answer [s 
shown in both hex and decimal. It is possible to enter 
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only one number (hex or decimal) followed by a return. 


The answer will be this number printed in both hex = and 
decimal, thus allowing base conversions. After each 
calculation, a new '=' prompt will be output. To exit 


this mode, type a 'treturn! as a response to the prompt. 


EXAMPLES: 
CALC Enter calculator mode 
=$A+10 Add hex A and 10 
$14 20 The result is printed 


DELIAY]=<value> 


PURPOSE: 
This will set the simulation delay (the amount of delay 
after each instruction fis executed) to an amount 


proportional to <value>. The higher the number (max = 
255) the longer the delay. A delay of zero will result 
in the delay being turned off. 


EXAMPLES: 
DELAY=100 Set delay to 100 
DELAY=0 Disable the delay 
DEPITH) 
PURPOSE: 
The depth command will print the deepest value of the 
stack pointer (the lowest memory address at which the 
stack was extended during program simulation). To 
initialize this pointer, it is necessary to set the stack 
pointer using the SET command. The depth value will be 


set to the same value as the stack pointer. This command 
is useful for determining the amount of stack space 
required by a program, 


EXAMPLES: 
DEPTH Print the deepest stack location 
ELXIT] 
PURPOSE: 
Exit the debug program. Use this command when finished 
with the Debug Package. 
EXAMPLES: 


EXIT Exit the debugger 
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FLIAG] {=<address>] 


PURPOSE: 
The Flag register is a 2 byte word at the specified 
memory location which will be displayed on a REG command 
or during tracing, as the 'F' register. The memory 
location for the flag will be set to the address 


specified. If no address is given, the flag register wil] 
be disabled. This is useful for tracking flags in memory 
during program tracing. See the REG command. 


EXAMPLES: 


FLAG=1A85 Set flag register to $1A85 
FLAG Disable flag register printout 


IND=ON or OFF 


PURPOSE: 
Used to enable or disable the indirection printout in a 


register dump (see REG). If IND is ON, the register dump 


will show a register called tI! which is the value of the 
memory location pointed to by the index (X) register. If 
this feature is off, the ! register will not be 
displayed. 
EXAMPLES: 
}ND=ON Turn indirection on 
| ND=OF F Turn it off 
MA[CH] 
PURPOSE: 
The MACH command will! print the current status. of the 
simulated machine. Values displayed are for mode (M), 
trace (T), instruction count trap (1), nest trap (N), 
stop address (S), interrupt trap (IT), transfer trap 
(XT), IRQ count (IRQ), and NMI count (NMI). The 
description of these appear elsewhere in this manual. 
EXAMPLES: 


MACH Print the machine status 


MO[DE]=1 or 0 


PURPOSE: 
The debugger has two modes of operation, mode 0 and mode 
1. The system comes up in mode 1. Mode 1 offers all 
debug features allowing the simulated program to run 
approximately 250 times slower than real time. in’ mode 
0, the program will run approximately 100 times slower 
than real time, but the following features are not 
supported; nest count checking, all traps, states 
counting, memory protection, past instruction 


bookkeeping, and automatic interrupts. Mode 1! should be 
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used most of the time to take full advantage of the 
debugger. 
EXAMPLES: 
MODE=1 Set mode to 1 
MO=0 Set mode to 0 
RIEG} 
PURPOSE: 
Print the contents of the machine registers. AIIl values 
are shown in hex. Besides the condition codes (C), A, B, 
and X registers, program counter (P) and stack pointer 
(S), the nest level, N, is displayed (shows how deep in 
subroutine calls) as well as two optional registers. One 
is enabled by the !ND command and displays the byte of 
memory being pointed to by the index register. This is 
shown as 'I|!' in the REG dump. The second option is 
enabled by the FLAG command and wil! display the selected 
two bytes of memory. This is shown as 'F!t in the dump. 
EXAMPLES: 
REG Display all registers 
R Display all reglisters also 
RES[ET] 
PURPOSE: 
The RESET command is used to reset all machine’ states. 
All registers will be set to zero, the stack pointer will 
be set to $A07F, all breakpoints and memory protection 
will be cleared, and the mode will be set to 1. This 
will set up the machine exactly the same as initializing 
the debugger upon first entry. 
EXAMPLES: 
RESET Reset the machine 
RET 
PURPOSE: 
Print the top two items on the stack. If the system is 
currently in a subroutine, these bytes will represent the 
return address from this routine. If the nest level is 


currently zero (N=0), the message "NEST LEVEL [S O" will 
be displayed. 


EXAMPLES: 
RET Print the return address 
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SIET],<register list> 


PURPOSE: 
The SET command is used to set or assign values to 
registers. The <register list> is a list of register 


names (C,A,B,X,S,P,N) followed by an equals’ sign, 
followed by the hex value. Setting the stack pointer 


will also set the depth value to the same amount. 
EXAMPLES: 

*  SET,P=100,A=C3 Set PC to $100 and A to $C3 

S B=20 X=1FFF Set B to $20 and X to $1FFF 


STACKI[,<value>} 


PURPOSE: 
Print the contents of the stack. The number of bytes 
specified by <value> will be printed. If <value> is not 


specified, the top 6 bytes will be printed. The stack is 
printed from high address to low address, so the top of 


stack will be the last item printed. 
EXAMPLES: 
STACK Print the top 5 stack bytes 
STACK, 10 Print the top 10 stack bytes 
STATIES] 
PURPOSE: 


Display the current value of the states counter. This 
value represents the number of actual machine cycles 
(micro seconds on a 1 megahertz computer) which have been 
executed since the last START or RESET command. It is 
also possible to set this counter to zero using 


breakpoints. 


EXAMPLES: 
STATES Print the current states count 
TRAIL 
PURPOSE: 
Print the address of the last executed instruction which 
caused a transfer of address (e.g. JMP instruction). 


This is useful when attempting to find how a program 
ended up where it did. 


EXAMPLES: | 
TRAIL Print the last transfer address 
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X,<operating system command> 


PURPOSE: 
The X ‘command is only operational on disk systems (see 


Adaptions). It allows the execution of any DOS command 
from the debugger. 


EXAMPLES: 
X,CAT, 1 Catalog drive 1 


_Itl. Memory Commands 


The memory commands allow examining and altering the contents of 
memory in a variety of ways. The assembler allows simple, direct 
insertion of object code by using standard opcode mnemonics and 
addressing mode designators. The disassembler provides an 
opposite type of convenience, in that the contents of memory may 
be displayed as assembler language mnemonics and operands. A 
single byte memory examine and change function is also available 
(the MEM command). Commands for viewing ltarge blocks of memory, 
finding specific hex or ASCII strings, and filling a section of 
memory with a selected character are al! available in this group. 


A(SMJ]1,<address>] 


PURPOSE: 
Enter the line at a time assembly mode. Assembly will 


start at the address specified or at the location of the 
program counter if no address is specified. No labels 
are permitted. AIl standard Motorola opcode mnemonics 
are accepted (no pseudo ops). When instructions contain 
a register specifier, there should be no space _ between 
the mnemonic and the specifier (e.g. LDAB, not LDA B). 
All standard addressing modes are accepted. All page 
zero references will be assembled as extended addresses, 
Three types of constants are permitted, decimal, hex 
(precede the number with '$'), and ASCII (precede the 
ASCI!! letter with a single quote (')). The PC is 
automatically advanced to the next focation after the 
line is assembled. To exit this mode, type a return in 
response to the address prompt. 


EXAMPLES: 
ASM, 100 Start assembly at $100 
100 LDAA #10 Load A with 10 
102 LDAB #'1 Load B with ASCII 1 
104 BRA $100 Loop forever 
106 Exit with return 
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D(iS},<start address>,<stop address> 


PURPOSE: 
Disassemble memory between the addresses specified. The 
address, mnemonic, and addressing mode wil! be printed 
out for each Instruction in the range. lf an illegal 
opcode Is found, three stars (***) will be displayed 


instead of a mnemonic, followed by the hex value found at 
that address, 


EXAMPLES: 
DIS, 100, 1A0 Disassemble from 100 to 1A0 


DUI{MP],<address> 


PURPOSE: 
Dump 256 byte blocks of memory starting at the address 
specified. The memory its displayed 16 bytes per line, 
followed by the ASCII values of the hex numbers, After 


each block is dumped, typing an 'F!' will move Forward and 
display the next 256 bytes, typing a 'B!' will move Back 
and display the previous 256 bytes. Typing a 'return! 
will exit this mode. 
EXAMPLES: 
DUMP, AOO Dump memory at $A00 


FIL(IL],<start address>,<stop address>[,<byte>] 


‘ 


PURPOSE: 
This command will fill memory with the <byte> (hex) 
specified starting at the first address, filling through 
the second address, lf <byte> is not specified, zero 
will be used, 
EXAMPLES: 
FILL, 100, 300,FF Fill with FF from 100 to 300 
FILL,O, 100 Clear from 0 to 100 


FIN(D],<start address>,<stop address>,<string> 


PURPOSE: 
Find the specified string in memory. The search will 
start at the <start address> and continue through the 
<stop address>, The address of each location where the 
string is found will be displayed. The <string> can be 
entered in one of two ways. The first can be a string of 
hex digits separated by spaces or commas. The second is 
an ASCII! string preceded by a double quote character. 
The limit on string length is the input buffer (72 


characters). 
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EXAMPLES: 
FIND,O,60,7E,33,A2 Find the hex value 7E33A2 
FIND,O,1000,"TEST Find TEST in memory 


M{EM],<address> 


PURPOSE: 
Examine and alter memory. The address specifies the 
first tocation to be examined. Upon entering this 
command, the address specified and its contents will be 
‘displayed on a new line. At this time, typing any non 
hex printing character will move to the next location and 
display its contents. Typing a 'line feed' will move to 
the previous location. A carriage return will exit this 
mode. To change the contents of a location, type the new 
hex value immediately following the one displayed. After 
the value, type a space. The new value will be entered 
and the next memory location will be displayed. I+ 
should be noted that it is only necessary to type the 
number of significant digits and only the last two digits 
are used. For example, typing a 1 would enter 01, typing 
1A2 would enter A2, etc. If only a space is typed (no 


number) a zero will be entered. Any time a non-hex 
character is typed (besides a space), the next location 
will be displayed, leaving the current location 


unchanged. 


EXAMPLES: 
MEM, 540 Examine memory at $540 
M, 200 Examine location $200 


IV. Simulation Control 


This group of commands is used to contro! the program simulator. 
Code in RAM or ROM may be simulated. There are several methods 
of initiating simulation. Programs may be executed with 'trace!t 
on or off. While trace is on, each instruction will be displayed 
prior to its execution, along with the current state of the CPU 
(all register contents are displayed). Trace provides a very 
powerful tool for following program flow. Several keyboard 
commands may be invoked during actual program simulation. These 
commands allow the speeding up or slowjng down of simulation, as 
well as ways to halt the execution of the program. The PAST 
command is a powerful bookkeeper which keeps track of where your 


program has been. 
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GIO} 


PURPOSE: 
Start the program executing at the location currently 


pointed to by the program counter. No machine values are 
altered with this command. 


EXAMPLES: 
GO Start the simulation at the PC 
G Does the same thing 


J{UMP],<address> 


PURPOSE: 
This command is exactly tike GO except execution will 


begin at the address specified. No machine values are 
altered with this command, except the program counter 
which ts set to <address>, 


EXAMPLES: 
JUMP, 322 Start simulation at $322 
J,80 | Start simulation at $80 


PAIST][,<value>] 


PURPOSE: 
Display the past several instructions executed by the 
simulated program. If <value> is not specified, the past 
255 instructions will be printed (oldest to most recent), 


otherwise <value> sets the number of instructions to be 
displayed. Each instruction is shown in a_ disassembled 
form, with its address. 


EXAMPLES: 


PAST Disptay the past 255 instructions 
PAST, 10 Display the past 10 instructions 


SIMI ,<count>] 


PURPOSE: 
Simulate the number of instructions specified by <count> 


with the trace disabled. If the count is not specified, 


one instruction will be executed. Execution starts at 
the current PC. No machine values are altered prior to 
simulation. Trace will be reset to its original value 


following SIM's termination, 


EXAMPLES: 
SIM Simulate one instruction 
SIM, 100 Simulate 100 instructions 
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ST{IART],<address> 


PURPOSE: 
Start program simulation at the specified address. The 
PC will be set to the address specified, the states 
counter will be zeroed, and the nest count will be 
cleared. 
EXAMPLES: 
START, 1000 Start simulation at $1000 
ST,2A Start simulation at $002A 


STEPI ,<count>] 


PURPOSE: 
This command will cause the debugger to enter the 'step! 


mode. The <count> specifies how many instructions should 
be executed at a time in this mode and defaults to one 
(single step). Upon entering the STEP command, the 
system will immediately execute the number of 
instructions specified by <count>, then print a register 
dump. The execution will begin at the location pointed 
to by the P register (program counter). After the 
register. dump, typing a 'space! will cause execution of 
the next <count> instructions and produce another 
register dump. Typing a 'treturnt will exit the step 
mode. Any other character will be ignored. It should be 
noted that while in the step mode, breakpoints and 
tracing are inoperable. 


EXAMPLES: 
STEP Enter 'single step! mode 
STEP, 10 Execute 10 instructions at a time 


TIRACE }=<value> 


PURPOSE: 
Set the trace depth. !{f value is set to zero, trace mode 
will be disabled. Setting trace to a non-zero value wil! 


enable tracing up to but not including the subroutine 
nest level indicated by <value>,. For example, if TRACE=2 
is entered, tracing will occur at nest level O and 1 but 
will be disabled at nest levels of 2 and higher. The 
nest level is displayed as 'N' in a REGister dump. 


EXAMPLES: 
TRACE=255 Enable trace at all levels 
T=0 Disable trace mode 
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TSEIM] {,<count> ] 


PURPOSE: 
This command is similar to SIM except trace mode is 
enabled (Trace=255) and the registers will be dumped 
after each instruction simulated, The count will default 
to 1 if not specified. Trace will be reset to its 
original value following TSIM's termination. 


EXAMPLES: 
TSIM Trace and simulate 1 instruction 
TSIM, 20 Trace 20 instructions 
"Control C! 
PURPOSE: 


Anytime a program is being simulated, a 'control Ct will 
cause the execution to halt and the message 'OP HALT AT 
XXXX' to be displayed at the terminal. This means 
‘Operator Halt' and the XXXX will be replaced by the 
actual address where the program was halted. 


‘Escape Character! 


PURPOSE: 
During program tracing, typing an ‘escape! will cause the 
program to pause at the end of the next displayed line. 
At this time, typing another ‘escape! will enable the 
trace to restart, while typing a 'returnt will return 


control back to the command entry mode. 
‘Control F! 


PURPOSE: 
During program simulation, the delay value (see DELAY) 
may be dynamically changed. Each time a 'control F! is 
typed (only during program simulation) the delay value 


will be decremented by one, thus making the program run 
faster. If the delay is zero, the ‘control Ft will be 
ignored. It should be noted that for large delays, many 
‘control Ft functions will need to be typed to see _ the 


increase in speed. 


‘Control S! 
PURPOSE: 
This is similar to the 'contro! Ft key but makes’ the 
simulation run slower. lf the delay is already at its 
maximum value, the 'contro! S!' will be ignored. 
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V. Breakpoints 


Breakpoints allow the insertion of check points into a program. 
A breakpoint always has an address associated with it. The 
address specifies where in the program the breakpoint action 
should occur. These actions range from printing the machine 
registers to controlling trace mode. Each breakpoint may also 
have a pass counter which determines the amount of time unti! it 
becomes active, or the amount of time it should remain active. 
The .actions are also dependent on the result of a conditional 
expression involving a CPU register or memory location. 
Breakpoints are decoded with th following precedence. If the 
address of the current PC matches the address of a breakpoint, 
then the pass count is checked. If the counter is in a state to 
allow continuing, then the condition is checked (if present). 
Finally the actions specified for the breakpoint are performed. 
The other commands in this group allow clearing breakpoints 
(removing them), printing histogram counter values, print 
breakpoint location and type, and clear histogram counters. 


B,<actions>@<address>[,<modifier><count>][,|IF<condition>] 


or 
B@é<address>{,<modifier><count>][,lF<condition>] 


PURPOSE: 
The B command is used to set breakpoints. These 


breakpoints are nondestructive in that they do not alter 
the contents of memory at the breakpoint location. Two 
forms of the command exist. The first .is the general 
form of the command and allows user definable breakpoint 
actions. The <actions> may be any one or combination of 


the following: 


R..-Print register contents 
Z...Zero the states counter 
T.e-lrace mode on 

U..eTrace mode off (untrace) 
H..e-Histogram counter 
M...Print message 

J.eeeJump to new address 
S..eeStop simulation 


The above actions are executed in the order shown, A 
histogram action causes a counter to be set up such that 
each time the instruction at the address specified is 


executed, the counter will be incremented by one. By 
later requesting a HISTogram, all of the counters” and 
their associated counts will be displayed. The second 


form of the B command. is a special case of the first. In 
this form, no actions are specified, and they default to 
S and R (just as if S and R were used in: form one). The 
<count> part of the syntax is optional and acts as a pass 
counter. The <modifier> shown in the command description 
represents either a '>', used to mean 'tafter!, and '<!' to 
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represent 'before'. A count preceded by '>!' will cause 
the breakpoint defined on the line to remain inactive 
until <count> number of times through that address, A 


count preceded by '<! will cause the breakpoint defined 
to be active for only the <count> number of times through 
that address, at which time if will be automatically 


removed. The <count> in either case must not exceed 
32,000. The next part of the syntax is the optional 
<conditional>. This allows the breakpoint action to be 
dependent on some condition. The condition can be the 
contents of any machine register being equal or not equal 


to a hex value ('=!' and '!=!' respectively), or the 
contents of a specified memory location being- zero or not 
zero. if aregister is used, simply state the register 


name, followed by the relational, followed by the hex 
value (e.g. A=23, or BI=E2). To use a memory location, 
a dollar sign '$' must precede the address. For example, 
$100=0 would check if the byte at tocation hex 100 was 
zero, and $A20!=0 would check if the byte at tocation hex 


A20 was not zero. If a memory address is specified, the 
only allowed value to the right of the relational is 
zero, and if any other value is used, it wil! be ignored. 


NOTE: The conditional part of the breakpoint definition 
may not be used with H,M, or J action codes. Two of the 
breakpoint actions require special syntax. These are the 
M (message) and J (jump) types. The M action fs used to 
print a specified message to the terminal upon execution 
of the breakpoint. The J action is used to transfer 
control to another address (like a JMP instruction). Any 
breakpoint containing M may not contain J and vice versa. 
A breakpoint containing M should have an ASCII string 
following the <count> (or following the address if no 
count is specified). This string is the message which 
will be printed on the terminal each time the instruction 
is to be executed. Messages should be kept short (under 
5 Jetters if possible). For the J type action, the hex 
address of the location of transfer should be provided 
after the <count> field. The examples below will help 
clarify the syntax. 


EXAMPLES: 
B@é100 Stop and print registers at $100 
B,SR@100 Same as above 
B,H@A100 Set histogram at $A100 
B,ZR@300 >100 Zero states and print registers 
after 100 times through $300 
B@200, IF A=3C Stop & print registers at $200 
_ only if acc. A = $3C 
B,M@210,SUB 1 Print message 'SUB 1! every time 


through location $210 


- continued - 
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B, J@100, 1000 Transfer control to location $1000 
when reach instruction at $100 
B,1Z@400,<25, IF $20=0 
For the first 25 times through 
location $400, turn trace on and 
zero the states counter, but only 
if location $20 is zero. 


BP[.,<address>[-<address>] ] 


PURPOSE: 

The BP command is used to print the _ location of 
breakpoints and their associated action codes. The two 
address specifications are used to define the region of 
memory for checking breakpoints (beginning and ending, 
respectively). If no addresses are specified, all 
breakpoints will be tisted. If only one address is 
given, then only the breakpoint at that address will be 
displayed (if one exists). Only the action codes are 
listed with each address, 


EXAMPLES: 


BP, 10-C00 List breakpoints between $10 & $C00 
BP List all breakpoints 


CLBI ,<address>[-<address>] ] 


PURPOSE: 
Clear breakpoints in specified memory region. The 
addresses define the region of memory. If only one 
address is listed then only the breakpoint at that 
location will be cleared. If no addresses are specified, 
all breakpoints will be cleared. 
EXAMPLES: 
CLB Clear all breakpoints 
CLB,0-100 Clear breakpoints between $0 & $100 
CLB,22A Clear breakpoint at $22A 


CLHI,<address>[-<address>]] 


PURPOSE: 
Clear histogram counters in the specified memory region. 
The addresses define the region of memory. If only one 
address is listed then only the histogram counter at that 
location will be cleared. If no addresses are specified, 
all counters will be declared. NOTE: This command does 
not remove the histogram breakpoints, but clears its 
associated counter to zero in preparation for a new run. 
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EXAMPLES: 
CLH Clear all histogram counters 
CLH, 25-200 Clear counters between $25 & $200 
CLM 
PURPOSE: 


Clear all messages in the breakpoint message table (used 
by the M action code, see the B command). This table is 
a fixed size and can be filled up. When deleting message 
type breakpoints using the CLB command, the associated 
space in the message table does not get freed. It is 
recommended that whenever all M type breakpoints have 
been cleared, also use the CLM command. Do not use this 
command if there are any active M type breakpoints. 


Their message strings will be destroyed! 
EXAMPLES: 
CLM Ctear all messages 


HLIST]{,<address>[-<address>}] 


PURPOSE: 
Print the histogram counter totals for the section of 
memory specified. The addresses define the region of 


memory. If only one address is tisted then only the 
counter at that location is displayed. If no addresses 
are specified, all counter contents will be displayed. 


Each counter is shown preceded by its address. The 
counter value shows the number of times the Instruction 
at that address has been executed. 


EXAMPLES: 
HIST . Display all histogram counters 
H, 0-200 Display counters between 0 & $200 


RT{,<address>] 


PURPOSE: 
Start real time program execution (not simulated) at the 
current PC location. Program execution will halt at the 


<address> specified. This is similar to the standard 
breakpoint most users are familiar with In that memory is 
actually altered at the address specified (with a JMP 
instruction). Entering RT without an address will clear 
any real time breakpoint which may have been previously 
entered. This type of breakpoint and program execution is 
not recommended since no protection or checking is 
performed. When the program reaches the break address ~ 
specified, the breakpoint is automatically cleared and 
the original code restored in memory. ROM may not be 
breakpointed with this command. 
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EXAMPLES: 
RT, 600 Start at PC, end at $600 
RT Clear an existing RT breakpoint 


Vi. Memory Protection 


The memory protection commands are a very powerful feature of the 
program debugger. The PROT command allows selected areas of 
memory to be write, execute, memory, or simulate protected. 


Write protected memory will cause a trap on any attempt to write 
to it. Execute protect will not allow opcodes to be fetched. 
Memory protect will not permit any type of reference; read, 


write, or execute. Simulate protect is used to protect sections 
of code which should not be simulated (executed in real time). 
It is Important that only code called as a subroutine’ from 
non=simulate protected memory be contained in the area(s) of 
memory designated as simulate protected. An example would be to 
simulate protect the section of memory where a DOS resides. Al] 
subroutine calls to the DOS would then be executed in real time. 
Code which is simulate protected and does not follow this 
convention will usually cause the CPU to take over the execution 
of the program resulting in a loss of control. NOTE: To protect 
the memory around the machine stack (upper and lower bounds), use 
the 'memory!' protection. This is the only type checked on stack 
references, Other commands in this group allow examination of 
protected memory regions or bounds, as well as the clearing of 
protection types. 


BO[UNDS]1,<types>] 


PURPOSE: 
Display the bounds of protected memory. Each <type> 
specified will list all regions of memory protected by 


that type. <type> may be W, M, xX, or S for write, 
memory, execute, and simulate, respectively. Mul tiple 
types may be displayed by listing the types on the 


command line separated by a comma or space. If no type 
is specified, all types of protection wil! be listed. 
EXAMPLES: 
BOUNDS Display all memory protection 
BO,M,xX Display memory and execute 


protection bounds 
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CLPI,<type>] 


PURPOSE: 
Clear all protected regions for a_ specified type of 
protection. The <type> is specified by the same letters 
described in BOUNDS. Only one type may be listed per 


command line. If type is not specified, all protection 
will be cleared. 
EXAMPLES: 
CLP Clear all protection 
CLP,X Clear execute protection 


P(ROT},<address>[-<address>],<type> 


PURPOSE: 

The PROT command is used to assign protection to a region 
of memory. The two <address> specifiers designate the 
beginning and ending addresses of the selected region. 
If only one address is specified, only the byte at that 
location will be protected. The <type> disignator may 
either be M, X, W, or S for memory, execute, write, and 
simulate protection respectively. Only one type may 
appear with each address range. Multiple protection may 
be performed on one line by separating the range-type 
specifiers by a comma or a space, 


EXAMPLES: 
PROT,0-100,M Memory prot 0-$100 
P,100,W,A100-A600,5S 
Write prot $100 and simulate 
protect $A100-A600 


Vil. Execution Traps 


Execution traps allow program stopping on _ certain general 
conditions. Several traps are always enabled. These include; 


trap on illegal opcode and trap on RTS if nest count=0. The user 
may enable and disable several other traps. These traps are for 
interrupt type instructions, transfer of address type 


instructions, trap on a selected subroutine depth (nest count), 
an instruction count timeout, and a general ‘stop! address. 


INST=<count> 


PURPOSE: 
Set the instruction count timer to the value of count. 
If set to zero, this trap will be disabled. This timer 


is used to count the number of simulated instructions. 
Each time this counter reaches zero, the program will 
halt and print '1C TIMEOUT AT XXXX!, where XXXX is the 
address where the program stopped, and the counter will 
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be reset to the value it started at (the value specified 
by <count>). 


EXAMPLES: 
INST=400 Set counter to 400 
INST=0 Disable the intruction counter 


ITIRAP]=ON or OFF 


PURPOSE: 
Turning the ITRAP on will cause the simulator to treat 


interrupt type instructions similar to illegal opcodes. 
Any time a RT!, SWI, or WAI instruction is found, the 
message '! TRAP AT XXXX! will be displayed. The address 


of the instruction will be printed in place of the XXXX 
shown. 
EXAMPLES: 
I TRAP=ON Enable the interrupt trap 
| T=OFF Turn off the trap 


N{EST]=<value> 


PURPOSE: 
Set the nest trap at the level specified by <value>. The 
execution if a subroutine call 


simulator will trap 
instruction is found which will cause the nest level to 
equal or exceed that set by NEST. Setting the <value> to 
zero will disable this trap. 
EXAMPLES: 
NEST=6 Set nest trap to level 6 
N=0 Disable nest trap 


STOP=<address> 


PURPOSE: 
The STOP trap is a general 'stop at address X' trap. It 


for trapping returns to monitor type programs 


is useful 
The trap is set at the address 


or operating systems. 
specified. 


EXAMPLES: 
STOP=100 Set stop trap at $100 
STOP=E0D0 Set trap at MIKBUG entry 


~34- 


TSC Debug Package 


XFR=ON or OFF 


PURPOSE: 
Enabling the XFR trap will cause a trap each time a 
transfer of address type instruction is found (JMP, BRA, 
or BXX). This is useful for following major program 
flow. Typing a 'G! command after this trap will cause the 
program to start executing again. 


EXAMPLES: 
XFR=ON Enable the transfer trap 
XFR=OF F Turn the trap off 


Vill. Interrupt Control 


Both NMI and IRQ type interrupts may be simulated. Two modes of 
operation are _ possible. The first is automatic, periodic 
interrupt generation, This mode allows interrupts to be 
generated every N_ instructions, The second allows random 
interrupt generation from the keyboard. When these keys are 
typed during program simulation, the appropriate interrupt will 
be issued. 


IRQ=<count> 


PURPOSE: 
Cause an IRQ type interrupt to be generated every <count> 
instructions. If count is set to zero, IRQ interrupts 


will be shut off. 


EXAMPLES: 
IRQ=5000 Generate IRQ every 5000 instructions 
IRQ=0 Turn off automatic IRQs 


NM | =<count> 


PURPOSE: 
Cause an NMI type interrupt to be generated every <count> 
instructions. lf <count> is zero, automatic NMI 
interrupts will be turned off. 
EXAMPLES: 
NM1=300 Generate NMI every 300 Instructions 
NM 1 =0 Turn off automatic NMIs 
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‘Control! |! 
PURPOSE: 
Typing a 'control |! during program simulation will cause 
an IRQ type interrupt to be generated. 
‘Control N! 
PURPOSE: 


Typing a 'controt N' during program simulation will cause 
an NMI type interrupt to be generated. 
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I. General System Control 
C{ALC] 

DELIAY]=<value> 

DEPITH] 

E(XtT] 


FILAG] [=<address>] 
|IND=ON or OFF 
MAI[CH] 

MO[DE]=0 or 1 
R{EG] 

RES[ET] 

RET 
S(ET],<register 
STACKI,<value>] 
STATIES] 

TRAIL 

X,<O. S. Command> 


list> 


[1. Memory Commands 

AISM][,<address>] 

D{IS],<start address>,<stop address> 
DUIMP],<address> 

FILIL],<start address>,<stop address>[,<byte>] 
FIN(D],<start address>,<stop address>,<string> 
M({EM],<address> 


tt. Simulation Contro! 
G{0]} 

J(UMP],<address> 
PA[STI][,<value>] 

SIMI ,<count>] 
ST{ART],<address> 

STEPI ,<count>} 

TIRACE ]=<val ue> 
TSUTIMI[,<count> ] 
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iV. Breakpoints 


B,<action>@<address>[,<moditier><count>][,1F<condition>} 
B@<address>[,<modifier><count>][,|IF<condition>] 

BP[ ,<address>[-<address>]] 

CLB[ ,<address>[-<address>}] 

CLHI,<address>[-<address>]] 

CLM 

HLISTI[,<address>{[-<address>] ] 

RT{,<address>] 


V. Memory Protection 


BO[OUNDS1[,<types>]} 
CLPI,<type>] 
P{ROT],<address>[-<address>],<type> 


Vi. Execution Traps 


INST=<count> 
ITORAP]=ON or OFF 
N(EST]=<val ue> 
STOP=<address> 
XFR=ON or OFF 


VII. Interrupt Control] 


[RQ=<counTt> 
NM 1 =<count> 
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Message Descriptions 


The following is a list of all Debug generated messages and 
their respective meanings. 


WHAT? = This is the general error message reported when = an 
invalid tnput command has been entered, 


"STOP" AT = The address set by the STOP trap command has_ been 
reached. 


IC TIMEOUT AT = The number of instructions specified by the INST 
trap command have been executed. 


{LLEGAL OPCODE AT = The instruction pointed to by the PC is an 
illegal opcode. 


1 TRAP AT = An SWI, RT!, or WAI instruction has been encountered 
and the ITRAP command has been used to enable the interrupt 
trap. 


LAST XFR FROM = Displayed by request using the TRAIL command. 
The address gives the location of the last transfer of 
address type instruction which was executed. 


SYNTAX ERROR = The command just entered does not follow the 
syntax rules for that command. 


EP TRAP AT = An Execution Protect trap at the specified location 
resulting from an attempt to execute code in execute 


protected memory. 


WP TRAP AT = A Write Protect trap at the specified location 
resulting from an attempt to write into write protected 
memory. 


EX - MP TRAP AT = An attempt to execute code residing in memory 
protected memory has been detected at the specified address, 


REF - MP TRAP AT = An attempt to reference (read or write) a byte 
in memory protected memory has been detected at the 


specified address, 


SP TRAP AT = A Stack Pointer reference (PSH, JSR, etc.) was 
attempted in a section of memory which is memory protected. 


TABLE OVERFLOW = The last command entered caused an internal 
table to overflow. The command dis not get executed. 


NC TRAP AT = A Nest Count trap occurred as a result of the nest 
level reaching the !tevel specified in a NEST command. 
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RTS IN LEVEL O AT = An RTS instruction was encountered while the 
nest level was O (no previous call to subroutine had _ been 


executed). 


NEST LEVEL 1S 0 = There is no return address on the stack so_ the 
RET command can not display an address. 


XFR TRAP AT = A transfer of address type instruction has_ been 
encounterd with the transfer trap enabled (from XFR=ON). 


MON XFR AT = The program being simulated tried to pass control to 
the monitor address which is used by the EXIT command. 


OP HALT AT = An operator halt signal (control C character) was 
detected by the simulator. 
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Getting Debug Running 


Cassette Version 


The Debug Package loads from address $3C00 through $5FFF. 
The tape should be loaded into memory using your monitor system's 
load routine. Once loaded, the program to be debugged should be 
loaded. it is important that the two programs do not overlap in 
memory. If they do, consult the section of this manual on 
relocating the debugger. After all code is resident in memory, 
start the Debug Package at location $4100, the cold start entry 
point. A '**! prompt should appear. The~* cold start entry 
initializes all system tables, clears all registers, and clears 
out breakpoints. If it is necessary to re-enter the debugger 
after an EXIT command, the program should be entered at location 
$4103, the warm start entry point. No clearing of values or 
tables is performed at this entry. 


Diskette Version 


The Debug Package loads from address $3C00 through $5FFF. 
The debugger may be executed by typing: 


+++DEBUG 


A '**t prompt should appear. The program is started through its 
cold start entry point (location $4100) which initializes all 
system tables, clears all registers, and clears out breakpoints. 
If it is necessary to re-enter the debugger after an EXIT 
command, the program should be entered at location $4103, the 
warm start entry point. No clearing of values or tables is 
performed at this entry. Once in the Debug Package, files may be 
loaded from the disk by using the X command. As an example, to 
load the file TEST.BIN, type the following: 


*¥*X, GET, TEST 


if TEST is found, it wil! be loaded into memory. It is important — 
that the program being tested and the Debug Package do not 


overlap in memory. lf they do, consult the section of this 
manual on relocation. When finished with the debugger, the EXIT 
command will return you back to FLEX™. 


-AIT. 


TSC Debug Package 


I/O Routines for DEBUG with SWTBUG 


Those using SWTBUG with the TSC DEBUG Package may experience problems 
with the Escape character stopping output as described. This happens 
because SWTBUG re-initializes the ACIA after each character through it, 
thus destroying any characters which may be pending in its buffer. The 
suggested fix is to provide your own I/0 routines instead of using 
SWIBUG's. The following patches should be made (these are for an ACIA at 


location $8004). 


7A 
Starting at address $5AE8 put the following: 


B6 80 04 46 24 FA B6 80 05 (39 36 B6 80 04 85 02 27 F9 32 B7 80 05 39 


a p\ 


vA 
Then at $4107 put: 5A E8 
and at $410A put: es 


This completes the patch. 
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Example Use 


The following iS an example debug session. It is assumed 
that the Debug Package is running and the program being tested is 
resident in memory. The sample program is shown first in its 
source l/isting form. Following is the sample debug operation. 


!. Sample Program Source Listing 


* 


* FIND THE MAX & MIN OF DATA LIST 
* 


0100 ORG $0100 
* STORAGE LOCATIONS 
0100 LARGE RMB 1 LARGEST VALUE 


0101 SMALL — RMB 1 SMALLEST VALUE 
0200 ORG $0200 


* PROGRAM STARTS HERE 
0200 CE 02 26 MINMAX LDX #DATA POINT TO DATA STRING 


0203 7F 01 00 CLR LARGE PRESET MAX 

0206 86 FF LDA A #$FF ALSO 

0208 B7 01 01 STA A SMALL PRESET MINIMUM 

020B A6 00 LOOP LDA A 0,X GET DATA ITEM 

020D Bl 01 00 CMP A LARGE ITEM > LARGE ? 

0210 24 03 BCC CONT2 

0212 B/7 01 00 STA A LARGE UPDATE LARGE 

0215 Bi 01 01 CONT2 CMP A SMALL ITEM < SMALL ? 

0218 24 03 BCC CONT3 

021A B7 01 00 STA A LARGE UPDATE SMALL 

021D 08 CONT3 ~—INX MOVE TO NEXT ITEM 

O21E 8C 02 2E CPX #DATEND END OF LIST? 

0221 26 E8 BNE LOOP IF NOT, REPEAT 

0223 7E EO DO JMP MON RETURN TO MONITOR 
* DATA LIST 

0226 02 DATA FCB 2,54, 76,32,12,87,55,6 

022E DATEND EQU m 

EODO . MON EQU $E0D0 MONITOR EQUATE 

END 
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11. Sample Debug Session 


**DIS, 200,223 


0200 LDX #$0226 
0203 CLR $0100 
0206 LDA A #$FF 
0208 STA A $0101 
020B LDA A 0,X 
020D CMP A $0100 


0210 BCC $0215 DisAssEMBLE MACH IWk Code FRomM 
ae he rf iat #200 To $223. SEE THE Soukck 
0218 BCC $021D AISTING FOR COMPARISON. 
021A STA A $0100 

021D INX 


O21E CPX #$022E 
0221 BNE $0208 
0223 JMP $£0D0 


**PROT,200,225,W WRITE Pkovkcr THE PhoéRAM AREA 
**BOUNDS ,W 


WRITE PROTECTION DISPLAY THE PROTECTION BaoviDS. 
0200-0225 
*kR DisPLAY THE REGISTERS 


C=00 A=00 B=00 X=0000 S=A07F P=0000 N=00 0000 ADC A $B9B9 
**START,200 S7ARr PlobLAM Ar #200 


MON XFR AT EOQDO ~ mew s7eR thansl£R TRAP. 

**M 100 

ul00 06. 0 &eamwé #looé 4#lo! (LAREE ¥ SmAtr) 

0101 FF ~ RESILT 16 OT CoRRECT ! 

ae P=200) sér Pek be AMme KECSTERS 

C=C5 A=06 B=00 X=022E S=AO7F P=0200 N=00 0200 LDX  #$0226 
**IND=ON SET Tid ¢ FLAL, Nok RESOLT 

**FLAG=100 jee 

**kR AONE 

C=C5 A=06 B=00 X=022E S=AO07F P=0200 N=00 T=B9 F=06FF 0200 LDX $0226 
**TSIM,10 TRACE 10 THSTRICTIONS 


U=C1 A=06 B=00 X=0226 S=A07F P=0203 N=00 I=02 F=O6FF 0203 CLR $0100 
6 B=00 X=0226 S=AQ7F P=0206 N=00 I=02 F=O0FF 0206 LDA A #$FF 
B=00 X=0226 S=A07F P=0208 N=00 I=02 F=00FF 0208 STA A $0101 
B=00 X=0226 S=A07F P=020B N=00 I=02 F=O00FF 020B LDA A O,X 
B=00 X=0226 S=AQ7F P=020D N=00 I=02 F=OOFF O020D CMP A $0100 
B=00 X=0226 S=A07F P=0210 N=00 I=02 F=OOFF 0210 BCC $0215 
B=00 X=0226 S=AO7F P=0215 N=00 I=02 F=OOFF 0215 CMP A $0101 
B=00 X=0226 S=AO7F P=0218 N=00 I=02 F=OOFF 0218 BCC $021D 
B=00 X=0226 S=AQ7F P=021A N=00 I=02 F=O0FF 021A STA A $0100 
B=00 X=0226 S=A07F P=021D N=00 I=02 F=O2FF 021D INX 


SET “SR' BeEhkPanr AT 4218 


EHFAAMAIDIAOADIAINONND 
* £$un tt tf tf UW HW on 
DWDBOIOIADIDBDAMQNANND 
VOrrFrKOOOMOA 
ye PPrPrrrYrrr>> 
aoeoqoqooqooo 17d 
MP PPh O71 


ont HU t UW Wn ou 


RO 


0218 - SR MsteA?Y All BREAKPONITE . 
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STAAT PROGRAM AT PC 


«kG Mir BREAKPOINT 
C=C1 A=36 B=00 X=0227 S=A07F P=0218 N=00 I=36 F=O02FF 0218 BCC $021D 
**TSIM -— TRACE 1 WSTRICTION, 


C=Cl A=36 B=00 X= ne S=A07F P=021A N=00 I=36 F=02FF 021A STA A $0100 
**ASM,21A Tae ee 
U2IA’STAA $101 sé Asm ro f/x | Shovid be sta h 101 | 


**CLB ‘ 
CLEAR ALL BREAKFAIUTS . 


**START 200 Ruw PeoéRAM AGAW 

MON XFR AT EODO . 

**M 100 oe 

vl00 00 . ExAMINE LARGE € SMALL. 

0101 02 2 
cis SmALe +s OK! LARLE 18 STILL LIROWE . 


**START , 200 Ew aA.e TRACE To 10 ¢ kual 


C=CO A=06 B=00 X=0226 S=A07F P=0203 N=00 I=02 F=0002 0203 CLR $0100 
C=C4 A=06 B=00 X=0226 S=AO7F P=0206 N=00 I=02 F=0002 0206 LDA A #$FF 


C=C8 A=FF B=00 X=0226 S=AO7F P=0208 N=00 I=02 F=0002 0208 STA A $0101 
C=C8 A=FF B=00 X=0226 S=A07F P=020B N=00 I=02 F=O0FF O20B LDA A O,X 
C=CO A=02 B=00 X=0226 S=AO7F P=020D N=00 I=02 F=OOFF 020D CMP A $0100 
C=CO A=02 B=00 X=0226 S=AO7F P=0210 N=00 I=02 F=OOFF 0210 BCC $0215 
C=CO A=02 B=00 X=0226 S=AO7F P=0215 N=00 I=02 F=OOFF 0215 CMP A $0101 
C=C1 A=02 B=00 X=0226 S=AQ7F P=0218 N=00 I=02 F=OOFF 0218 BCC $021D 
C=C1 A=02 B=00 X=0226 S=AO7F P=021A N=00 I=02 F=OOFF 021A STA A $0101 
C=C1 A=02 B=00 X=0226 S=AO7F P=021D N=00 I=02 F=0002 021D INX 

C=C1 A=02 B=00 X=0227 S=AQ7F P=021E N=00 I=36 F=0002 O21E CPX #$022E 
C=C1 A=02 B=00 X=0227 S=AO07F P=0221 N=00 I=36 F=0002 0221 BNE $0208 
C=C1 A=02 B=00 X=0227 S=AQ7F P=020B N=00 I=36 F=0002 020B LDA A 0,X 
C=C1 A=36 B=00 X=0227 S=AO7F P=020D N=00 I=36 F=0002 020D CMP A $0100 
C=CO A=36 B=00 X=0227 S=AO7F P=0210 N=00 I=36 F=0002 0210 BCC $0215 
C=CO A=36 B=00 X=0227 S=AO7F P=0215 N=00 I=36 F=0002 0215 CMP A $0101 
C=CO A=36 B=00 X=0227 S=AO7F P=0218 N=00 I=36 F=0002 0218 BCC $021D 
C=CO A=36 B=00 X=0227 S=AO7F P=021D N=00 I=36 F=0002 021D INX 

OP HALT AT 0210 

**DIS 20B 210 SHOULD NOT HAVE BRAKKHE D 


020B LDA A 0,X ' / 
0200 CMP A $0100 | 2 "Sound 66 BLS swsTave ron: 


0210 BCC $0215 


**ASM 210 . 
u210 BLS $215 Usk ASM To CokkREcr cove. 

u212 

“STA S b Loft) 

**START 200 LT TRACE To 0 

MON XFR AT EODO Awd Kor) PLOGRAM- 
**M 100 

0100 57. AMSWERS ALE KOwW CORRECT / 

0101 02 
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**B HQ200 
**B HO20B 

**B HO215 

**B HO21D 

**kBP 

0200 - H 

020B - H 

0215 - H 

021D - H 

**START 200 
MON XFR AT EODO 
**HIST 

v200 - 0 

020B - 8 

0215 - 8 

021D - 8 
**STATES 

STATES = 00000300 
**DIS 200 223 
0200 LDX  #$0226 
0203 CLR $0100 
0206 LDA A #$FF 
0208 STA A $0101 
020B LDA A 0,X 
020D CMP A $0100 
0210 BLS $0215 
0212 STA A $0100 
0215 CMP A $0101 
0218 BCC $021D 
021A STA A $0101 
021D INX 

O21E CPX  #$022E 
0221 BNE $0208 
0223 UMP $E£0D0 
**EXIT 

$ 


Heoti-e THE FevGeRAm wiTd AisTosRam 
BLEAK PoIITS AT $200,208, 215, $2/D. 


DISPLAY ALL BREAKPOINTS | 


Ru TRObCRAM —'s7Her' cLbhbe 
THLE STATES Coun TB KR, 


HISTOCKAIN PRINTOUT 


HL06CAAM REOULED 300 MhcHME CVCLEE 


LISASSEN ELE FiUAL PFEOGRAM, 


Ek’7 Fok LDEMGEER, 
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Adapting to Your System 


The following descriptions may prove helpful in adapting 
this program to non-standard systems. All [1/0 and stack 
references are described below. 


|. I/O References 


GETCHR at $4106. This jump vector references the standard input 
character routine in the SWTBUG monitor ROM. Any. input routine 
may be used as long as itt returns the ASCII character in the A 
accumulator with the parity removed, and preserves the B and X 
registers. 


PUTCHR at $4109. This jump vector references the standard output 
character routine in the SWTBUG monitor ROM. Any output routine 
may be used as long as it outputs the character from the A 


accumulator, and preserves the B and X registers. 


WARMS at $410C. This jump vector references the starting entry 
address of the SWTBUG monitor ROM. This may be changed to _ the 
starting address of your own monitor. This is the address used 
by the EXIT command. 


!t. 1/0 Related Storage 


ACItA at $410F. This FDB formed address is a pointer to the ACIA 
base address used by the basic input and output routines. Change 
as needed. NOTE: The Debug Package requires an ACIA type. serial 
interface to function correctly. 


BSP at $4111. This byte contains the character which is decoded 
as the backspace character (currently a Control! H, $08). Change 
as desired. 


DEL at $4112. This byte contains the character which is decoded 
as the line cancel character (currently a Contro! xX, $18). 
Change as desired. 


BSE at $4113. This byte contains the character which will be 
echoed after the receipt of a backspace character (currently a 
Control H, $08). .1f this character is set to $08, a space will 
be output preceding the backspace echo character, Setting this 
byte to zero will inhibit the backspace echo character. 


ESC at $4114. This byte contains the character which is decoded 
as the Escape character (currently an ASCII Escape, $1B). This 
may be changed as desired. 
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fll. Stack Pointer References 


Load Stack at $411B and $4195, These two locations contain LDS 
instructions and set the stack to $3FFF. They may be changed as 


desired. 


IV. The X Command 


The X command calls a section of code at location $5589. This is 
implemented for the FLEX disk operating system and calls FLEX to 
perform a specified command. lf you are using a different 
operating system, you may substitute your own code to perform the 
equivalent. The code may reside from $5589 through $55A2. 


Vv. System Tables 


The Debug Package uses several system tables which reside from 
$3C00 to $3F9F. They are named and sized as follows: 


BPTAB RMB 256 Allows 32 breakpoints 


STRTPC RMB 512 u 256 past instructions 
SMTAB RMB 32 it 8 sim prot fields 
EXTAB RMB 32 HJ 8 ex prot fields 
WPTAB RMB 32 " 8 write prot fields 
MTAB RMB 32 " 8 mem prot fields 
MSGTAB RMB 32 is approx 5 messages 


These tables may be moved and expanded to allow more breakpoints 
and protection fields as desired. Complete details will not be 
given here, as this is a job for the more experienced programmer. 


VI. Saving the Altered Program 
After modifications have been made to the program, it may be 


saved on mass storage. The program should be saved from $4100 
through $5FFF. The starting or transfer address is $4100. 
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Relocating the Debug Package 


The Debug Package may be relocated in memory by using’ the 
TSC 6800 Relocator (part number SL68-28). The Debug Package as 
sold resides from $3C00 to $5FFF. It may be moved easily to any 
lower memory tocation and to any location higher than $5C00. The 
example below shows relocation to $5C00 which moves the cold 
start entry address to $6100 (from $4100). The relocated version 
will reside from $5C00 to $7FFF. If it is necessary to move’ the 
program to an area between $3C00 and $5C00, two relocations must 
be performed, one moving it to a lower location, and then up to 
the desired position. This is necessary because of program 
overlap. NOTE: The Debug Package must always start on a _ page 
boundary. 


Relocation Example 


* TSC 6800 RELOCATOR * 

PRESENT PROGRAM: 

BEGIN ADDRESS? 4100 
END ADDRESS? 5FFF 

TO? 6100 

FIX REFERENCES? Y 

LOAD FROM TAPE? N 

DATA BLOCKS? Y 


BEGIN ADDRESS? 410F 
END ADDRESS? 411A 


BEGIN ADDRESS? 57A8 
END ADDRESS? 5FFF 


BEGIN ADDRESS? FFFF 
ALTER RANGE? Y 
BEGIN ADDRESS? 3B00 
END ADDRESS? 5FFF 
FIX FDB'S? Y 
ADDRESS? 57AC 
ADDRESS? 57B0 
" 57B9 
" 57BE 
" 57C5 
" 57CB 
" 57D1 
" 57D7 
" 57DD 
" 57E3 
" 57EB 
" 57F3 
" 57FA 
" 5801 
" 5808 
" 580F 
" 5816 
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st 581B 
i 5822 
uf 5828 
" 582F 
uN 5835 
" 583D 
" 5844 
i 584A 
” 5851 
" 5858 
7 585F 
a 5865 
7 586C 
ui 5873 
" 5879 
” 5881 
u 5887 
" 588C 
if 5892 
" 5898 
7 58A0 
" 58A8 
" 58B 1 
" 58B8 
" 58BF 
S 58C7 
u 58CF 
" 58D6 
" 58DA 
" 58E0 
" 58EB 
" 58ED 
" 5 8EF 
he 58F 1 
" 58F 3 
un 58F 5 
" 58F7 
ie 58F9 
M 58FB 


‘a 58FD° 


" 5 8FF 
" 5901 
I 5903 
" 5905 
" 5909 
" 590D 
5911 
i. 5915 
5919 
y 591D 
ADDRESS? 5921 
ADDRESS? FFFF 


RELOCATION COMPLETE !!! 
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Source Listing 
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* 

* TSC DEBUG PACKAGE 

* 

* COPYRIGHT ¢C> 1978 BY 

* TECHNICAL SYSTEMS CONSULTANTS, INC. 

* BOX 2576 

* W. LAFAYETTE. INDIANA 47906 

* 

by 

* TEMP STORAGE 
4000 ORG $4209 
4000 LINBUF RMB 80 
40528 68 00 BUFPNT FOB (3) 
4052 86 86 CRSAVE FDB a 
4054 08 68 INDEX FOB a 
4856 80 80 DATPNT FOB i) 
4858 06 08 XSAVE FOB Q 
485A 00 OUTNUM FCB a 
495B 00 TEMP FCB 2) 
405C 08 TEMP1 FCB i) 
495D 00 88 VALUE FDB ) 
405F 60 98 POINT FDB 8 
4061 08 6G POINTe FDB a 
4063 00 08 FIRST FDB Vs) 
4065 90 22 LAST - FDB Vs) 
4067 00 CNTR FCB 8 
4868 80 LSTTRM FCB 2) 
4869 80 RTBF FCB 1) 
406A 8@ 80 RTAD FOB a) 
406C 00 RTDAT FCB 8.6.6 
406F @@ MOD = = FCB a 
4970 80 OPND FCB 8.0.0 
4073 06 90 END FOB 8 
4075 06 06 COUNT FDB 3) 
4077 08 BO MAXC FDB Va) 
4979 68 88 NMIC FOB 9 
407B 08 22 NMIC2 FDB a 
407D 88 80 IrRaC FOB Q 
407F 88 88 IRGCe FDB 8 
4881 08 90 MAXSP FDB 1) 
4083 09 00 TSP FDB 8 
4085 80 90 STPCNT FOB B 
4987 86 00 SIMCNT FOB 2) 
4689 88 WAITF FCB 8 
4a8R OO PAUSF FCB 8 
408B 60 DELAY FCB a 
498C 60 cc FCB a 
488) 08 AR FCB Vs) 
4Q8E 00 BR FCB 8 
408F 68 00 xR FDB 3) 
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4091 
4093 
4095 


oa 


' TABE FDB 


SP FOB @ 
PC FDS 8 
SSP FDB 8 


OLOPC FOB 
NESTC FCB 
OPCNT FCB 
MODE FCB 


PRON FCB 
TRCF FCB 
FLAGA FOB 
FLAGB FCB 
YFLG FCB 


ERFL FCB 
NOBKF FCB 
CFLG FCB 
NSTRP FCB 
XFRT FCB 
STATES FDB 
ITRF FCB 
BPPOS FDB 
BPEND FDB 


~ 


BPCODE FCB 
BT'YP FCB 
BPAD FOB 
NXTBP FOB 
NXTMSG FDB 
INCOD FCB 
EQUALS FCB 
RELADR FOB 
MARKRG FDB 
LASTS FOB 


NXTPC FDB 
OPPNT FD6 
OPPNT2 FDB 
SMEND FDB 
EXEND FDB 
WPEND FOB 
MEND FDB 


ERDR FDB 


PVSSSGHPVOVOVV AIO SPGP§AI9I9 GD AO9 SOSA PMHSOHAHHVHVHVOHVHOV HIV AH HVOgggs 


POPTAB FDB 
OP FDB 
FCB 
OPJMP FDB 
FCB 
BxOP FOB 
FCB 
BxXOP2 FOB 
FCB 


* SYSTEM EQUATES 
* 
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9007 
eeeD 
@09A 
ea20 
3FFF 


4160 


4106 
4103 


4106 
4109 
410C 
410F 
4111 
4112 
4113 
4114 
4115 
4117 
4119 
4107 
416A 
4$10D 


4118 
411E 
4121 
4123 
4124 
4127 
4129 
412aC 
412F 
4131 
4134 
4137 
413A 
413D 
413F 


7E 
7E 


44 
44 


FA 


FC 


1B 
9S 


FF 
63 


Da 


* 


* SYSTEM ENTRY 


* 


COLDS 


EQU 
EQU 
EQU 
EQu 
EQu 


ORG 


JMP 


WARMST JMP 


$07 
$@D 
$0A 
$20 
$3FFF 


$4188 


COLD 
WARM 
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BELL CHARACTER ‘TG) 
CARRIAGE RETURN 
LINE FEED 

SPACE 


* SYSTEM CONSTANTS AND JUMP VECTORS 


GETCHR 
PUTCHR 
WARMS 
ACTA 
BSP 
DEL 
BSE 
Esc 
SWIV 
TRAV 
NMIV 
INV 
OuUTY 
MONYV 


* 


JMP 
JMP 
JMP 
FOB 
FCB 
FCB 
FCB 
FCB 
FDB 
FDB 
FDB 
EQu 
EQU 
EQu 


$E1AC 
$E1D4 
SEQDa 
$8004 
$08 

$18 

$08 

$1B 
$FFFA 
$FFFS 
$FFFC 
GETCHR+4 
PUTCHR+4 
WARMS+4 


* COLD START ENTRY 


* 


COLD 


COLD2 


LBS 
LDX 
CLR 
INX 
CPX 
BNE 
LDX 
STX 
LDA 
STA 
STA 
LDX 
STX 
LDA 
STA 


DDD 


#STACK 
#FIRST 
QO. X 


#EARDR 
COLDe2 
#TRCRET 
OPIMP+1 
#$7E 
OP JMP 
BxXOP2 
#PBRA 
BxOPe+1 
#$39 
BXOP+2 


POINT TO TEMPS 
CLEAR STORAGE 


END OF AREA? 
SET TEMP CODE 


SET JUMP 


SET CON BRA 


SET RETURN 
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4142 
4144 
4147 
414A 
414D 
4159 
4153 
4156 
4159 
415C 
415F 
4162 
4165 
4168 
416B 
416E 
41471 
4174 
4176 
4179 


4170 
4L7F 
4182 
4185 
4188 
418B 
418E 
4194 
4194 


4195 


4195 
4198 
4198 
419D 
41AG 
41A3 
41A6 
41A9 
41AC 
41LAF 


* CLEAR 


CLRPR 


* 
* 


WARM 


LBA 
STA 
LDX 
STX 
STX 
STX 
LDX 
STX 
LDX 
STX 
STX 
LDX 
STR 
LDR 
STX 
LD* 
STX 
BSR 
INC 
JMP 


PROTECTION TABLES 


LEX 
ST 
LOX 
STH 
Low 
STH 
LOX 
STK 
RTS 


EQuU 


* EXECUTIVE 


EXEC 


EXECS 


LDS 
CLR 
LDA 
STA 
LOA 
STA 
LDX 
JSR 
JSR 
JSR 


A 
A 


STARTS HERE 


DDDD 


#1 
BXOP+1 
#OPTAB 
POPTAB 
OPPNT 
OPPNT2 
#AUXTAB 
OPPNT2 
#$AO7F 
SP 
MAXSP 
#BPTAB 
BPEND 
#STRTPC 
NXTPC 
#MSGTB 
NXTMSG 
CLRPR 
MODE 
WARM 


#EXTAB 
EXEND 
#SMTRB 
SMENCG 
#WPTAB 
WPEND 
#MTAB 
MEND 


* WARM START ENTRY 


* 


#STACK 
PAUSF 
#1 
NOBKF 
TRCF 
PRON 
#PRMPT 
PSTRNG 
INBUF 
SKPSPC 


SET 


SET 


SET 


SET 


SET 


SET 


TSC ASSEMBLER PAGE 
REL BRA 


TABLE 


POINTER 


INITIAL STACK 


UP TABLES 


TABLE 


CLEAR PR TABLES 


SET 


SET 


MODE TO 1 


ALL EMPTY 


SETUP STACK 
CLEAR PAUSE 


SET 


SET 


NO BREAK 


TRACE 


POINT TO PROMPT 
OUTPUT IT 


GET 


INPUT LINE 


SKIP SPACES 
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41Be 
41B4 
41B6 
41B9 
41BB 
41BE 
4109 
41C2 
4104 


4106 
4109 
41C0C 


41CE 
4101 


41D3 
41D6 
41D9 
41DB 
41DE 
41E9 
41Ee 
41E4 
41E6 
41E9 
41EC 
4$1EE 
41F0 
41F1 
41F4 
41F6 
41F8 
41FB 
41FC 
41FE 
4201 
4283 
4205 
4207 
4268 


81 
2? 
BO 


CE 


20 


CE 
20 


S93 


C7 


S93 
F6 


3B 


FQ 


54 
50 


42 


56 
54 


S4 


56 


42 


5a 


CMP A #CR 

BEQ EXEC 
JSR CLASS 
BCS ILIN 
LDX #COMTBL 
BSR LKNAM 
BNE ILIN 
LOX 1,% 

JMP @. & 


EXEC6 


a 
* REPORT ILLEGAL INPUT 
* 


ILIN LOX #WHATST 
ILINe JSR PSTRNG 
ILIN4 BRA EXEC 


* 
* REPORT SYNTAX ERROR 
* 


SYNER LDX #SYNST 
BRA ILINe 


%* 


* LOOK FOR NAME IN TABLE 


* 


LKNAM STX INDEX 

LKNAM2 LDX BUFPNT 

LKNAMS LOA A OB. x 
JSR CLASS 
BCS LKNAM9 


CMP A #85F 
BLS LKNAM4 
SUB AR #$20 

LKNAM4 STX DRTPNT 
LDXx INDEX 
CMP A 8X 
BNE LKNAMG 
INK 
ST INDEX 
TST Q.% 
BNE LKNAMS 

LKNA4i LDX DATPNT 
INX 
LDA A 8X 
JSR CLASS © 
BCC LKNASS 
CMP A #CR 
BEQ LKNA42 
INX 

LKNA42 STX BUF PNT 
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LONE CARRIAGE RET? 


CLASSIFY CHAR 
ERROR? 

POINT TO TABLE 
LOOK FOR NAME 
ERROR? 

GET COM ADDRESS 
JUMP TO IT 


POINT TO STRING 
OUTPUT IT 
RESTART 


POINT TO STRING 


SAVE POINTER 
SET POINTER 

GET A CHARACTER 
CLASSIFY IT 
TERM? 

CHECK IF UPPER CASE 
It rs 

MAKE UPPER 

SAVE INDEX 
RESTORE POINTER 
CHECK CHARACTER 


BUMP THE POINTER 
SAVE INDEX 
CHECK IF END 


POINT TO NAME 
BUMP TO NEXT 
GET CHARACTER 
CLASSIFY IT 
TERM? 

Is IT RETURN? 


BUMP TO NEXT 
SAVE NEW POSITION 
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426B 
420E 
420F 
4210 
4213 
4215 
4218 
4219 
4218 


423C 
423F 
4242 
4245 
4248 
424A 
4240 
424F 
4251 
4253 
4255 
4257 
425A 
425C 
425E 
425F 
4261 
4263 
4264 
4267 
4269 
426B 
426E 


FE 48 54 


48 
a7 
46 


BE 


es) 
FB 


54 


56 


Be 


56 


54 


54 


4F 


96 


90 


LKNAGS 
LKNAMS 


LKNAM6 
LKNAM? 


LKNAMS 
LKNAMNS 


LKNASS 


* 

* INPUT 
* 

INBUF 


INBUFe 


INBUFS 


INBUF4 


INBUFS 


INBUF6 


LDX 
CLR 
RTS 
LDBX 
BRA 
LDX 
INK 
BRA 
INK 
TST 
BNE 
INS 
INX 
INK 
TST 
BNE 
CPX 
RTS 
DEX 
ST 
LOX 
TST 
BEQ 
INK 
STA 
BRA 


LINE INTO BUFFER 


LDX 
STx 
JSR 
CMP 
BEQ 
CMP 
BEQ 
CMP 
BEQ 
CMP 
BLS 
CPX 
BEQ 
STA 
INK 
CMP 
BNE 
RTS 
LDX 
BSR 
BRA 
CPX 
BEQ 


INDEX 


INDEX 
LKNAM? 


- DATPNT 


LKNAMS 


Q. X 
LKNAM6 


B.% 
LKNAM 
#6080 


DATPNT 
INCEX 
Q. X 

LKNA41L 


INCEX 
LKNASS 


#LINBUF 
BUFPNT 
GETCHR 
DEL 
INBUFS 
BSP 
INBUFSE 
#CR 
INBUF 4 
#$1F 
INBUF2 


#LINBUF+79 


INBUFe 
a, % 


#CR 
INBUF2 


#DELST 
PSTRNG 
INBUF — 
#LINBUF 
INBUFS 
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POINT TO TABLE 
SHOW FOUND 
RETURN 

RESET POINTER 
CONTINUE 

RESET POINTER 
BUMP THE POINTER 


BUMP POINTER 

END OF WORD? 
REPERT 

BUMP PAST ADDRESS 


END OF TARBLE? 
REPEAT IF NOT 
SET NE BIT 
RETURN 

SAVE POINTER 


POINT TO TABLE 
END OF LIST? 


BUMP TO NEXT 


REPEAT 


‘POINT TO BUFFER 


SET POINTER 
GO GET A CHARACTER 
IS IT DELETE? 


IS IT BACK SPACE? 
IS IT CARRIAGE RET? 


IS IT CONTROL? 
IGNORE IF sO 


PUT CHAR IN BUFFER 
BUMP THE POINTER 
IS IT RETURN? 
REPEAT IF NOT 
RETURN 

POINT TO STRING 
OUTPUT IT 


FRONT OF BUFFER? 
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4278 
4271 
4274 
4276 
4278 
427A 
427D 
4280 
4283 


4285 
4287 
4289 
428B 
428D 
4299 
4294 
4293 


4294 
4297 
429A 
429C 
429F 
42AL 
42AR2 
42A4 
42A6 
42A8 
42AB 
42AD 
4260 
42B2 
42B5 


42B6 
42B9 
42BC 
42BE 
42BF 
42C1 
42C3 


a9 


Se 
8A 


OF 


14 
99 


se 


OF 
8A 


INBUGS 


* 
* PRINT 
*e 


PSTRNG 
PDATAL 


PDATR2 


* 


* PCRLF 
* 


PCRLF 


PCRLFe 


1 


DEX 

LDA RAR BSE 
CMP A #8 

BNE INBU65S 
LDA A #eSPC 
JSR = PUTCHR 
LDA A BSE 
JSR PUTCHR 


BRA INBUF2 


STRING AT X 


BSR PCRLF 
LDA A OX 
CMP RAR #4 

BEQ PDATR2 
JSR PUTCHR 
INK 

BRA PDATAL 
RTS 


ROUTINE 


STX CRSAVE 
TST PAUSF 
BNE WAITR 
LDX ACIA 


LDA A BX 
ROR A 

BCC PCRLFe2 
LOR A 1,.% 
AND RR #$7F 
CMP A ESC 


BEQ WAITR 
LDX #CRLFST 
BSR PDATAL 
LDX CRSAVE 
RTS 


* WAIT FOR RESPONSE 


* 


WRITR 


WAITRL 


LDX ACIA 
CLR PAUSF 
LDA A 8K 
ROR A 

BCC WAITRL 
LOA A 4. 
AND A #$7F 
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DEC THE POINTER 
GET ECHO CHAR 
Is IT TH ? 


SETUP SPACE 
OUTPUT IT 
GET CHAR 
OUTPUT IT 
REPEAT 


OUTPUT CR & LF 
GET A CHARACTER 
Is IT TERM? 


GO PUT CHAR. 
BUMP THE POINTER 
REPEAT IT 


SAVE 
PAUSE? 


POINT TO ACIA 
GET STATUS 
CHARACTER? 


GET CHARACTER 
MASK PARITY 
IS IT ESCAPE? 


POINT TO STRING 
PRINT IT 
RESTORE xX 
RETURN 


POINT TO ACIA 
CLEAR FLAG 
GET STATUS 
CHARACTER? 


GET CHARACTER 
MASK PARITY 


? 


TSC DEBUG PACKAGE 


4205 BL 41 14 
42C8 27 ES 
42CA 81 03 
42CC e7 64 
42CE 81 @D 
4206 26 EAR 


420e 7E 41 95 WAITREe 


* 


CMP 
BEQ 
CMP 
BEQ 
CMP 
BNE 
JMP 


A 


A 


A 


Esc 
PCRLF2 
#$3 
WAITR2 
#$D 
WAITRL 
EXEC 
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Is IT ESCRPE? 
Is IT tC? 
Is IT CR? 


RETURN TO EXEC 


* OUTPUT DECIMAL NUMBER AT X 


La 


4205 7F 48 SA OUTDEC 


4208 F7 49 SC 
42DB 86 04 
42DD B? 4@ 5B 
42E9 AG OO 
42E2 E6 O41 
42E4 CE 58 E3 
42E7 8D 9A 
42E9 08 

42EA 08 

42EB 7A 40 5B 
42EE 26 F7 
42F@ 17 

42F41 20 42 


te 


OUTDE2 


OUTDE4 


CLR 
STA 
LDA 
STA 
LBA 
LDA 
LDX 
BSR 
INS 
INK 
DEC 
BNE 
TBA 
BRA 


wWDDDDM| 


OUTNUM 
TEMP4 
#4 

TEMP 
Q,% 

4% 
#CONTBL 
OUTDIG 


TEMP 
OUTOE4 


OUTHR 


* QUTPUT DECIMAL DIGIT 


* 


42F3 7F 48 75 OUTDIG 
OUTDI2 


42F6 AL 60 
42F8 25 OF 
42FA 22 04 
$2FC E1 O1 
42FE 25 ag 
4308 EO O1 
4382 A2 80 
4304 7C 40 75 
4307 20 ED 
4309 36 

436A B6 40 75 
430D 26 10 
430F 7D 48 SA 
4312 26 OB 
4314 7D 40 SC 
4317 27 8B 
4319 86 26 
431B 8D 22 
4310 20 B5 


431F 7C 40 SA OUTDI6 


4322 80 11 
4324 32 


OUTDI4 


OUTDIS 


OUTDIS 


CLR 
CMP 
BLO 
BHI 
CMP 
BLO 
SUB 
SBC 
INC 
BRA 
PSH 
LDA 
BNE 
TST 
BNE 
TST 
BEQ 


LBA. 


BSR 
BRA 
INC 
BSR 
PUL 


COUNT 
@.% 
OUTDI5 
OUTDI4 
4,% 
OUTDIS 
4,% 
0.% 
COUNT 
ouTDIe2 


COUNT 
OUTDIE 
OUTNUM 
OUTDIE 
TEMPL 
OUTDIS 
#SPC 
OUTHRE 
OUTDIS 
OUTNUM 
OUTHR 


CLEAR FLAG 

SET SUP FLAG 

SET COUNTER 

SAVE IT 

GET MSE 

GET LSB 

POINT TO CONSTANTS 
DUTPUT DIGIT 


BUMP TO NEXT CONST. 


DEC THE COUNT 


GET LS DIGIT 
OUTPUT IT 


CLEAR COUNTER 
CHECK MSB 


COMPARE LSB 


SUB LSB 

SUB MSB 

BUMP COUNTER 
REPEAT 

SAVE A 

GET TOTAL 

Is IT ZERO? 
SUPRESS ZEROES? 
NUMBER YET? 
NULL OR SPACE? 


SETUP SPACE 
DUTPUT IT 


SHOW NUMBER 
OUTPUT DIGIT 
RESTORE A 
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4325 39 


a 


* OUTPUT FOUR HEX DIGITS 


" 


$326 8D 01 
4328 88 


* 


* OUTPUT HEX DIGIT AT X 


* 


4329 AG BO 
432B 8D 04 
432D RAS BB 
432F 20 04 


$331 44 OUTHL 


4332 44 
4333 44 
4334 44 


4335 84 OF OUTHR 


4337? 8B 30 
4339 81 39 
433B 23 82 
433D 8B 07 


433F 7E 41 89 OUTHR2 


* 


OUTHEX 


RTS 


OUTADR BSR 


INX 


LDA 
BSR 
LDA 
BRA 


LSR 
LSR 
LSR 
LSR 


AND 
ADD 
CMP 
BLS 
ADD 
JMP 


A 


A 


» DDD DDDD 


OQUTHEX 


@.%X 
OUTHL 
OX 
OUTHR 


#$F 
#$30 
#°9 
OUTHR2 
#7 
PUTCHR 


* CLASSIFY CHARACTER 


* 


4342 81 38 CLASS 


4344 25 14 
4346 81 39 
4348 23 15 
434A 81 41 
434C 25 Oc 
434E 81 SA 
4350 23 8D 
4$35e 81 61 
4354 25 04 
4356 81 7A 
4358 23 95 
435A @0 
435B B? 4@ 68 
435E 39 
435F @C 
4360 39 


* 


CLASS2 


CLASS4 


CMP 
BLO 
CMP 
BLS 
CMP 
BLO 
CMP 
BLS 
cMP 
BLO 
CMP 
BLS 
SEC 
STA 
RTS 
CLC 
RTS 


> D D 


D 


#°S 
CLASS2 
#°9 
CLASS4 
#°R 
CLASS2 
#°Z 
CLASS4 
#°R+$20 
CLASSe 
#°2+%20 
CLASS4 


LSTTRM 


TSC RSSEMBLER PAGE 


RETURN 


AT X 


OUT 2 DIGITS 
BUMP POINTER 


GET MSB 
OUTPUT IT 
DO LSB 
OUTPUT IT 


GET MSB TO LSB 


MASK OFF MSB 
ADD IN BIAS 
OVER NUMBERS? 


FINISH BIAS 
OUTPUT IT 


Is IT 8? 
REPORT 
COMPARE TO 9 
Is IT NUMBER? 
COMPARE TO A 
REPORT 
COMPRRE TO 2 
Is IT LETTER? 
CHECK FOR LOWER 
REPORT 

UPPER LIMIT 


SET FOR NOT 
RETURN 


SHOW ALPHANUMERIC 
RETURN 


* GET NEXT CHRRACTER FROM BUFFER 


9 


TSC DEBUG PRCKAGE 


* 


4361 FF 480 54 NXTCH STX INDEX 
4364 FE 40 50 NxXTCH@ LDX BUFPNT 
4367 RE BO NXTCHS LDA AR BX 
4369 S81 OD CMP A #CR 
436B 27 eC BEQ NXTCH4 
4360 a8 INX 
436E FF 40 56 STX BUFPNT 
4371 81 298 CMP A #SPC 
4373 26 04 BNE NXTCH4 
4375 AL 80 CMP RAR 8.x 
4377 27 EE BEQ NXTCHS 
4379 FE 40 54 NXTCH4 LDX INDEX 
437C 20 C4 BRA CLASS 

* 

* SKIP ALL SPACES 

* 
437E FF 40 S2@ SKPSPC STX CRSAVE 
4381 FE 40 58 LDX BUFPNT 
4384 RE BO SKPSP2@ LDR A BB. 
4386 81 20 CMP AR #SPC 
4388 26 93 BNE SKPSP4 
438A 88 INX 
438B 20 F7 BRA SKPSP2 
438D FF 46 5@ SKPSP4 STX BUFPNT 
4390 FE 48 52 LDX CRSAVE 
4393 39 RTS 

* 

* PREVIEW NEXT CHARACTER 

* 
4394 FF 48 52@ PRYW ST CRSAVE 
4397 FE 46 SO LOX BUFPNT 
439R RAE OB LDR A 8.% 
439C FE 46 S52 LDX CRSAVE 
439F 39 RTS 

* 

* WORK IN HEX VALUE 

* 
43A0 37 WRKHX PSH B 
43R1 C6& 84 LOA B #4 
43A3 78 46 SE WRKHX4 ASL VALUE+1 
43R6 79 48 SD ROL VALUE 
43A9 SA DEC B 
43AAR 26 F?7 BNE WRKHX4 
43AC 33 PUL B 
43AD BB 48 SE ACD RAR VALUE+1 
43680 Br 48 SE STA A VALUE+1 
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SAYE INDEX 

GET POINTER 

GET THE CHARACTER 
IS IT RETURN? 


BUMP THE POINTER 
SAVE NEW POSITION 
CHECK FOR SPACE 


NEXT CHAR SPACE? 
SKIP IF SO 
RESORE INDEX 

GO CLASSIFY 


SAVE INDEX 
GET POINTER 
GET CHARACTER 
IS IT SPACE? 


BUMP TO NEXT 
REPEAT 

SET POINTER 
RESTORE INDEX 


SAVE xX 

POINT TO CHARACTER 
GET CHARACTER 
RESET % 

RETURN 


SAVE IND 
SET UP COUNT 
SHIFT OVER 4 


DEC THE COUNT 
LOOP TIL DONE 
RESTORE IND 


SET NEW DIGIT 


TSC DEBUG PACKAGE TSC ASSEMBLER PAGE 14 


43B3 5c INC B SET INDICATOR 
43B4 39 RTS 


* 
* GET HEX VALUE FROM BUFFER 
* 


4$3B5 SF GETHEX CLR B CLEAR INDICATOR 
43B6 Fr? 48 5D STA B VALUE CLEAR WORK SPACE 
43B9 Fr 40 SE STA B YALUE+1 

43BC BD 43 614 GETHE2 JSR NXTCH GET CHARACTER) 
43BF 25 @E Bcs GETHES GRAPHICS? 

43C1 8D 11 BSR TSTHEX TEST FOR HEX 
4303 25 04 BCS GETHES ERROR? 

43C5 8D D9 BSR WRKHX 

4307 20 FS BRA GETHE2 

43C9 BD 43 64 GETHE6 JSR NXTCH GET CHARACTER 
43CC 24 FB BCC GETHES6 WAIT FOR TERM 
43CE 39 RTS ERROR RETURN 
43CF FE 48 SD GETHES LDX VALUE GET YALUE 

43D2 eC CLC CLEAR ERRORS 
4303 39 RTS RETURN 


* 
* TEST FOR HEX DIGIT 
* 


4304 81 60 TSTHEX CMP AR #$68 IS IT LOWER? 
4306 23 82 BLS TSTHEL 

4308 88 20 SUB R #$28 MAKE UPPER 
43DA 80 47 TSTHEL SUB A #°G REMOVE BIAS 
43DC eA GE BPL TSTHE4 

43DE 9B 66 ADD A #6 CHECK RANGE 
43E0 2A O04 BPL TSTHEe ERROR? 

43E2 SB 67 ADD A #7 ADD BACK IN 
43E4 2A 86 BPL _ TSTHE4 ERROR? 

43E6 8B OA TSTHE2 ADD R #10 FINAL BIAS 
43E8 2B 62 BMT TSTHE4 ERROR? 

43ER 8C TSTHES CLC CLEAR ERRORS 
43EB 39 RTS RETURN 

43EC OD TSTHE4 SEC SET ERROR 
43ED 39 RTS RETURN 


* 
* INPUT DECIMAL NUMBER 
* 


43EE 7F 48 SD INDEC CLR VALUE CLEAR WORK 

43F1i 7F 40 SE CLR VALUE+1 

43F4 SF CLR B CLEAR COUNTER 
43F5 BD 43 64 INDEC2 JSR NXTCH GET CHARACTER 
43F8 25 DS BCS GETHES TERM? 

43FR 81 39 CMP A 8°99 CHECK FOR NUMBER 


43FC 22 CB BHI GETHES 
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43FE 84 OF AND A #$F 
4400 37 PSH B 
4401 36 PSH A 
4492 B6 42 SD LDA A VALUE 
4485 F6 40 SE LDA B VALUE+4 
4408 58 ASL B 
4429 49 ROL A 
449A 56 ASL B 
4408 49 ROL A 
44aC 59 ASL B 
44aD 49 ROL A 
448E 78 40 SE ASL VALUE +4 
4441 79 40 5D ROL VALUE 
4414 FB 40 SE ADD B VALUE+4 
4417 B9 49 5D ADC A VALUE 
441A F7 4@ SE STA B VALUE+4 
444D 33 PUL B 
444E FB 40 SE ADD B VALUE+1 
4421 89 oo ADC A #0 
4423 F7 4 SE STA B VALUE+4 
4426 B7 4@ 5D STA A VALUE 
4429 33 PUL B 
442A SC INC B 
442B 20 C8 BRA INDEC2 
* 
* ADD B TO X 
* 
442D FF 40 52 ADDBX STX CRSAVE 
4430 FB 40 53 | ADD B CRSAVE+1 
4433 F7 40 53 STA B CRSAVE+1 
4436 24 @3 BCC ADDBX2 
4438 7C 40 52 INC CRSAVE 
443B FE 49 52 ADDBK2 LDX CRSAVE 
443E 39 . RTS 
oe 
* GO SIMULATE PROGRAM 
* 
443F BD 4C 63 GO JSR TSTTRM 
4442 26 32 BNE SIMUL® 
4444 20 4A BRA SIMUL2 
‘ 
* JUMP TO ADDRESS 
* 
4446 BD 4C 63 JUMP JSR TSTTRM 
4449 27 2B BEQ SIMUL® 
4448 20 3B BRA SIMULS 


TSC ASSEMBLER PAGE 12 
MASK NUMBER 

SAVE COUNT 

SAVE NUMBER 

GET VALUE 


DO TIMES 6 


TIMES 2 
ADD IN NEW 


SAVE NEW 
GET NUMBER 


SAYE RESULT 


GET COUNT 
BUMP COUNT 
REPEAT 


PUT INDEX 
ROD IN 8 
SAVE NEW 


BUMP MSB 
GET NEW YALUE 
RETURN 


CHECK TERM 
ERROR? 
GO TO IT! 


CHECK TERM 
ERROR? 
GO TO IT! 


TSC DEBUG PACKAGE 


444D 
4458 
4453 
4455 
4457 
4459 
445B 
445D 
445E 
445F 
4468 
4461 
4462 
4463 
4464 
4465 
4466 
4468 
446—A 


4$46B 
446E 


4471 
4474 
4476 
4479 
447C 
447F 
4482 
4485 
4468 
4488 
448D 
4498 
4493 
4496 
4499 
4498 
449E 
44AL 
44AZ 
44A4 


CE 
7E 


* LOOK FOR BREAKPOINT 
* 


3C 80 LKBP LOX #BPTRB 
40 RE LKBPS3 CPX BPEND 
43 BEQ LKBPS 
88 CMP AQ. 
a bed BNE LKBP4 
O41 CMP B 1,% 
O41 BNE LKBP4 
RTS 
LKBP4 INX 
INX 
INxX 
INX 
INK 
INX 
INX 
INX 
ES BRA LKBP3 
OL LKBP6 LOA A #1 
RTS 
" 
* OPERATOR HALT 
* 
SA DS OHALT LDX #OPHST 
43 3E JMP SIMUL? 
* 
* SIMULATE PROGRAM 
me 
4C 63 SIMUL JSR TSTTRM 
a3 BNE SIMULA 
41 CE SIMULO JMP SYNER 
96 @@ SIMUL1 LDX #0 
49 A? STX STATES 
40 AS STx STATESt+2 
49 89 CLR WAITE 
40 99 CLR NESTC 
43 BS SIMU15 JSR GETHEX 
ES BCS SIMULG 
49 93 STX PC 
40 93 SIMUL2@ LD PC 
40 97 STX OLDPC 
40 73 CPX END 
a3 BNE SIMULS 
45 4A JMP ‘STOP 
414 OF SIMULS LDX ACIA 
L's} ) LDA A @.X 
ROR A 
46 BCC SIMULS 
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POINT TO TABLE 
END OF TABLE? 


CHECK ADDRESS 


MATCH? 
RETURN - FOUND! 
BUMP TO NEXT ENTRY 


REPEAT 
SET NO FIND 
RETURN 


POINT TO STRING 
GO REPORT 


CHECK TERM 
ERROR? 

REPORT ERROR 
CLEAR REGISTERS 


SET NEST = @ 
GET ADDRESS 
ERROR? 
SET PC 
GET PC 


FINISHED? 

DO STOP 

POINT TO PORT 
GET STATUS 


CHARACTER TYPED? 


TSC DEBUG PACKAGE 


44A6 
44RA8 
44AA 
44AC 
44ARE 
44B1 


14 


8A 


8B 


8B 


8B 


8B 


O12 


7B. 


@1 
AZ 
93 
4D 


54 


88 


SIMUZS 


SIMUL4 


SIMU4S 


SIMU48 


SIMULS 


SIMULEG 


SIMU61 
SIMU62 


SIMU65 


SIMU67 


LDA 
AND 
CMP 
BEQ 
CMP 
BNE 
STA 


CMP 
BNE 
LDA 
CMP 
BEQ 
INC 
BRA 
CMP 
BNE 
LDA 
BEQ 
DEC 
BRA 
CMP 
BNE 
LDX 
STX 
BRA 
CMP 
BNE 
LOX 
STX 
TST 
BNE 
LDA 
LDA 
JSR 
BNE 
JMP 
LDA 
BEQ 
LDX 
DEX 
BNE 
DEC 
BNE 
JSR 
LDX 
STX 
JSR 
LDX 
BEQ 
DEX 
STX 
BEQ 
TST 


»D DDD 


» 


D>D DB 


1,% 
4$7F 
#$3 
OHALT 
ESC 
SIMU3S 
PAUSF 
SIMULS 
#$13 
SIMUL4 
DELAY 
#$FF 
SIMULS 
DELAY 
SIMULS 
#$06 
SIMU45 
DELAY 
SIMULS 
DELAY 
SIMULS 
#$E 
SIMU48 
#1 
NMIC2 
SIMULS 
#$09 
SIMULS 
#4 
TRaC2 
NOBKF 
SIMUL6 
PC 
PC+4 
LKBP 
SIMUL6 
PRBP 
DELAY 
SIMUES 
#0189 


SIMU62 


SIMUGE1 
TRCOL 
PC 
OLDPC 
PRREG 
SIMCNT 
SIMU67 


SIMCNT 
EXIT 
CFLG 
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GET CHARACTER 
MASK PARITY 
Is If tc? 
Is IT ESCAPE? 
SET FLAG 
Is IT ts? 


GET DELRAY 
Is IT SLOWEST? 


SLOW COWN 
Is IT tr? 
GET DELAY 
FASTEST? 
SPEED UP 
Is IT tN? 


SET COUNT TO 1 


Is IT tI? 
SET COUNT TO 1 
DO BP? 


GET PC 


CHECK BREAKPOINT 


DO BREAK POINT 
GET DELAY 

IS THERE ANY? 
SET COUNTER 
DEC THE COUNT 
DELAY HERE 
FINISHED? 
REPEAT 


ADJUST PC 


GET COUNT 


DEC BY ONE 
SAVE NEW 
FINISHED? 
COUNT ENABLED? 


TSC DEBUG PACKAGE 


4527 26 03 BNE 
4529 7E 44 99 SIMU6S JMP 
452C FE 40 75 SIMU69 LOX 
452F 29 DEX 
4530 FF 40 75 STX 
4533 26 F4 BNE 
4535 FE 40 77 LDX 
4538 FF 40 75 STX 
453B CE 59 64 LDX 
453E BD 42 85 SIMUL7 JSR 
4541 CE 40 93 LDX 
4544 BD 43 26 JSR 
4547 7E 44 95 EXIT IMP 
454A CE 59 AS STOP LDX 
454D 20 EF BRA 

*" 

* IQ CHECK 

* 
454F B6 48 9C DOIOI LDA 
4552 27 1D BEQ 
4554 B1 40 99 CMP 
4557 23.18 BLS 
4559 CE 59 88 LDX 
455C 20 @D BRA 
455E B6 48 9C DOIOO LDA 
4561 27 GE BEG 
4563 B1 40 99 CMP 
4566 23 09 BLS 
4568 CE 59 8D LDX 
456B BD 42 87 porIco2 JSR 
456E FE 40 93 LDX 
4571 FF 40 0S boro STX 
4574 86 BD LDA 
4576 B7 40 D4 STA 
4579 BD 47 @2 JSR 
4570 86 39 LDA 
457E B7 40 D4 STA 
45841 C6 O4 LDA 
4583 F7 40 9A STA 
4586 7E 47 Be IMP 
4589 CE SA CC DOMON LDX 
458C 20 Ba BRA 

« . 

* TRACE ONE 

* 
458E 86 041 TRCOL LDA 
4598 B? 40 05 STA 
4593 B7 40 D6 STA 
4596 7F 40 Ae CLR 
4599 FE 40 93 LDX 


UDDD DD 


SIMU69 
SIMUL2 
COUNT 


COUNT 
SIMU63 
MAXC 
COUNT 
acTSsT 
PSTRNG 
#PC 
OUTADR 
EXEC 
#STPST 
SIMUL? 


#HMONS 
SIMUL? 


LINE 


DDD 


- #$01 


OP+1 
OoP+2 
EAFL 
PC 
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REPEAT 

DEC COUNT 

GET VALUE 

RESET COUNT 
POINT TO STRING 
PRINT IT 

PRINT ADDRESS 


POINT TO STRING 


TEST IF TRACE ON 
CHECK NEST 
POINT TO STRING 
TRACE ON? 
CHECK NEST 


TSO STRING 
STRING 


POINT 
PRINT 
GET PC 
SAVE AS JMP ADDR 
SETUP JSR 


GO DO IT 
SETUP RTS 


DO RETURN 
POINT TO STRING 
REPORT XFR 


NOP CODE 


CLEAR FLAG 


TSC DEBUG PACKAGE 


459C 
459F 
45AL 
45A4 
4$5A6 
45A9 
4S5AB 
4S5AE 
45B1 
45B4 
45B7 
4S5BA 
4S5BD 
45BE 
45C1 
45C2 
45C4 
45C6 
45C9 
45CC 
45CF 
4501 
4504 
4507 
45D9 
4508 
4500 
45DF 
45E2 
45E4 
45E7 
45EA 
45SEC 
45EF 
45F1 
45F3 
4SF5 
45F7 
45F9 
45FC 
45FF 
4601 
4603 
4605 
4687 
466A 
460C 
4690D 
4610 
4612 
4615 
4617 
4619 
461C 


D4 


9B 


AC 


99 


56 
AS 


AS 


S12 


vF 


AS 


99 


3B 


AA 


TRCOL1L 


TRCOOAL 


TRCHK 


TRCHK1L 
TRCHKe 
TRCHK4 


TRCHKS 


TRCHKE 


CPX 
BEQ 
CPx 
BEQ 
CPX 
BEQ 
LDX 
STH 
LDX 
LDA 
LDA 
JSR 
TPA 
LDX 
TAP 
BEQ 
LDA 
STA 
JSR 
TST 
BNE 
JMP 
LDA 
BEQ 
AND 
CMP 
BNE 
TST 
BNE 
JMP 
TST 


TST 
BNE 
CMP 
BEQ 
CMP 
BNE 
JMP 
JMP 
CMP 
BEQ 
CMP 
BNE 
LDA 
BEQ 
DEC 
CMP 
BHI 
JMP 
LDA 
ANC 
ADD 
BAA 


OD 


DD 


DBD 2) xD 


DDD 


INV 
DOIOLI 
OUTY 
DOIOG 
MONY 
DOMON 
SMEND 
TABE 
#SMTARB 


PC+1 
CHECK 


PC 


TRCHK6 


NESTC 
TROHKE 
TRNEST 
3.4 

#$F 
STATES+3 
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MONITOR REFERENCE? 


SET UP POINTERS 


GET PC 
CHECK SIM PROT 
RESET PC 


DO IN REAL TIME 
GET OPCODE 


FIND OPCODE 
CHECK MODE 


GET CODE 
ILLEGAL? 
MASK BITS 
Is IT RTS? 
CHECK NEST 


REPORT NEST ERROR 
XFR TRAP ON?. 


NO BREAK? 

Is IT BRA? 

Is IT JMP? 

REPORT XFR TRAP 
REPORT ILL OPCODE 
Is IT BSR? 

Is IT JSR? 

CHECK NEST TRAP > 


DEC THE COUNT 
CHECK CURRENT NEST 


REPORT TRAP 

GET CODE 

MASK STATE COUNT 
ADD IN STATES 


TSC DEBUG PACKAGE 


461D 
4620 
4622 
4624 


AS 


Ag 


AS 


A8 


A? 


A? 
AB 


D4 


C3 
93 


coe 


36 
6a 


coe 
7B 


7B 


TRCHK?7 


TRCOL2 


TRCOSP1L 


TRCSPe 
TRCLeS 


TRCO13 


STA 
BCC 
LDA 
ADD 


STA 
BCC 
LDA 
ADD 


STA 
BcC 
LDA 
ADD 
DAA 
STA 
TST 
BEQ 
LDA 
CMP 
BLO 
CMP 
BHI 
LDX 
JMP 
JSR 
LDA 
CMP 
BHI 
CMP 
BLO 
CMP 
BHI 
LDA 
BRA 
CMP 
BLO 
LDA 
JSR 
LDA 
LDA 
LDX 
STA 
STA 
INX 
INX 
CPX 
BNE 
LDX 
STX 


BEA 
DEX 
STX 


> DD DD DD D DD DB 


DD 


OD oD a »D @ 2D D> DD 


STATES+3 
TRCHK? 
#1 
STATES+2 


STATES+2 
TRCHK? 
#1 
STRTES+1 


STATES+1 
TRCHK? 
#1 
STATES 


STATES 
ITRF 
TRCO1e2 
OP 
#$3B 
TRCO1e 
#$3F 
TRCO1e 
#ITRST 
SIMUL? 
PRCH 
OP 
#$37 
TRCL25 
#$32 
TRC12e5 
#$33 
TRCSP1 
#1 
TRCSPe 
#$36 
TRCL25 
#-1 
CHKSP 
PC 
PC+41 
NXTPC 
a. x 
1, % 


#ENDPC 
TRCOLS 
#STRTPC 
NXTPC 
NMIC2 
TRCO1L4 


NMIC2 
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SET UP A ONE 


ITRAP ON? 


GET OPCODE 
CHECK TYPE 


POINT TO STRING 
REPORT TRAP 

CHECK PROTECTION 

GET OPCODE 

CHECK FOR PSH OR PUL 


IS IT PUL? 
SET OFFSET 
Is IT PSH? 
SET OFFSET 
CHECK SP 
GET PC 


POINT TO TABLE 
MAKE ENTRY 


BUMP TO NEXT 
END OF TABLE? 
RESET POINTER 


SAVE POSITION 
CHECK INTERRUPTS 


NMI? 


TSC DEBUG PACKAGE 


4699 
4698 
463E 


46R1 . 


46A3 
46A4 
46A7 
46A9 
46AC 
46AF 
46B1 
46Be2 
4685 
46B6 
46B9 
46BC 
4$6BE 
4608 
46C2 
46C4 
4607 
46C9 
46CB 
46CE 
46CF 
4601 
4604 
4605 
4603 
46DB 
46DE 
46E0 
46E2 
46E4 
46E6 
46E7 
46ES 
46EB 
46ED 
46EF 
46F2 
46F5 
46F7 
46F9 
' 46FA 
46FB 
46FC 
. 46FE 
4768 
4702 
4705 
4788 
476B 
470E 


3A 
7F 


TF 


1D 


89 


93 


AS 


3A 


DS 


DS 


BE 


58 
EB 


TROO14 


TRCOLS 


TRCOLe 


OP2LNG 


OPSLNG 


TRCOL3 
OP1LNG 


TRCOL4 


TRCO4S 


TROO47 


TRCOLS 


BNE 
JMP 
LDX 
BEQ 
DEX 
STX 
BNE 
JMP 
TST 
BEQ 
RTS 
LOX 
INS 
CLR 
LDA 
CMP 
BLO 
BHI 
LDA 
STA 
BRA 
LDA 
STA 
INK 
LDA 
STA 
INK 
STX 
LDA 
LDA 
RRND 
CMP 
BLO 
BNE 
DEX 
DEX 
STX 
CMP 
BEQ 
JMP 
LDX 
SUB 
BEQ 
INX 
INS 
DEC 
BNE 


LO 


JtMP 
STS 
LDS 
LDX 
LDA 
LDA 


DD DD 


DD 


DUvDDN 


TRCO1I4 
PNMTI 
IRAC2 
TROO1LS 


TRACe 
TRCOLS 
PIRQ 
WALITF 
TRCOL2 


PC 


NOBKF 
OPCNT 
#2 
OPILNG 
OP3LNG 
G.% 
OP+1 
TRCOL3 
a. x 
OP+1 


O,% 


OP+e2 


PC 

OP 
INCOD 
#3F 

#3 
TRCOLS 
TRCOL4 


LAST J 
#328 
PBRA 
PBMS 
#FUNTAB 
#4 


TRCO47 © 


TRCO45 
B.% 
B.% 
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GO BDO NMI 
CHECK IRQ 


DO IRQ 
WRITING FOR INT? 


RETURN 
GET PC 
BUMP TO NEXT 


GET COUNT 
CHECK OP LENGTH 


BUMP PC 
SAYE NEW VALUE 


GET CODE 
GET TYPE 
IS IT REGULAR? 


BRANCH TYPE? 

SET XFR ADDR 

IS IT BRA? 
CONDITIONAL BRANCH 
POINT TO TABLE 
REMOVE BIRS 

BUMP TO NEXT 

DEC THE OFFSET 


GET JUMP YECTOR 
JUMP TO IT 


GET REAL STACK 
GET * REG 

GET B REG 

GET A 


TSC DEBUG PACKAGE 


4711 
4712 
4715 
4716 
4717 
471A 
4718 
471C 
471F 
4728 
4723 
4726 
4729 
472C 
472F 


4738 
4732 
4735 
4738 
4739 
473A 
4730 


473F 
4740 
4743 
4746 
4749 
474C 
474F 
4752 
4754 
4757 


4758 
4756 
475E 
4761 
4762 


40 


40 


FE 


48 


40 
26 


40 


40 


40 


8c 


D4 


Bc 


8D 
8E 
8F 
91 
95 


C3 
93 


BE 


PSH 
LDA 
TAP 
PUL 
JMP 
TRCRET PSH 
TPA 
STA 
PUL 
STA 
STA 
STX 
STS 
LOS 
RTS 


ta 


BaDDD D D DD 


* PROCESS BSR 


1 


PBSR LDA 
JSR 
LDX 
DEX 
DEX 
STX 
BSR 


* 


* PROCESS BRA 


* 


PBRA CLR 
LDA 
ADD 
ADC 
STA 
STA 
TST 
BPL 
DEC 
PBRAG RTS 


% 


DDwWDDMs 


cc 


OP 


#-2 
CHKSP 
PC 


LASTI 
PSUBC 
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GET C CODES 
DO OPCODE 


SAVE CC 


SAVE A 
SAVE B 
SAVE X 
SAVE SP 


RETURN 


SET OFFSET 
CHECK SP CHECK STACK PROT 
FIX LAST XFR 


SET ADDRESS 


CALCULATE ADDRESS 


SAYE NEW RDDRESS 


RETURN 


* PROCESS CONDITIONAL BRANCH 


Ed 


PBXX LDA 
STA 
LDA 
TAP 
JMP 


A 
A 
A 


OP 
BXOP 
cc 


BxXOP 


GET TYPE 
SAVE IT 


DO CON BRANCH 
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* PROCESS SUBROUTINE CALL 
by 


4765 BF 40 95 PSUBC STs SSP SAVE STACK 
4768 BE 48 91 LOS SP 

476B B6 40 94 LDA A PC+1 PUSH ADDRESS 
476E 36 PSH A 

476F B6 48 93 LDR A PC 

4772 36 PSH A 

$773 BF 46 91 STs SP SAVE STACK 
4776 BE 48 95 LDS ‘SSP 

4779 7C 40 99 INC NESTC SET NEST COUNT 
477C 39 PSUBCe RTS RETURN 


* 
* PROCESS JSR 
* 


4770 37 PISR PSH B SAVE OPCODE 
477E C6 FE LDA B #-2 SET OFFSET 
4780 BD 56 C3. JSR CHKSP CHECK SP 
4783 33 PUL B RESTORE B 
4784 Ci AD CMP B #$RAD IS IT INDEXED? 
4786 27 16 BEQ PJISRX 
4788 8D DB BSR PSUBC DO CALL 
* 
* PROCESS JMP 
* 
473A C1 GE PIMP CMP B #$6E Is IT INDEXED? 
478C 27 12 BEQ PJIMPX 
47SE FE 40 93 LDX PC GET PC 
4791 89 DEX 
4792 @9 DEX 
4793 09 DEX 
4794 FF 48 BE STX LASTS SET LAST XFR 
4797 FE 46 DS LDX OP+1 
479A FF 48 933 STA PC 
4790 39 RTS RETURN 


* 
* PROCESS INDEXED JSR 


479E 8D C5 PJISRX BSR PSUBC 

47AQ FE 40 93 PJIMPX LOX PC GET PC 

47AS 89 DEX FIX POS 

47A4 O9 DEX 

47AS FF 40 BE STX LASTJ SET LAST XFR 
47AS FE 40 SF LDX xR 

47RAB FF 40 93 STX PC 


47RE 20 8F BRA PBRA 
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* 
* PROCESS RTS INSTRUCTION 
* 


47BQ C6é 62 PSUBR LDA B #2 SET OFFSET 
47Be BD S6 C3 JSR CHKSP CHECK SP 
47BS FE 48 93 LDX PC SET LAST XFR 
47B8 69 . DEX 

47B9 FF 40 BE STX LASTS SAVE ADDRESS 
47BC BF 40 95 STS SsP 

47BF BE 48 91 LDS SP 

47C2 32 PUL A RESET PC 
47C3 B? 40 93 ' STR RA PC 

47C6 32 PUL A 

47Cr B7 40 94 STA A PC+L 

47CA BF 48 91 STS SP SAVE STACK 
47CD BE 40 95 LDS SSP 

47D0 7A 40 99 DEC NESTC FIX NEST COUNT 
47D3 39 RTS 


* 
* PUSH REGISTERS ON STACK 
rev 


4704 77 48 89 PONS ASR WAITF TEST WAIT STATUS 
47D7 25 2D BCS PONS2 

47D9 Cé FO LDA B 8-7 SET OFFSET 
470B BD S56 C3 JSR CHKSP CHECK SP 
47DE BF 40 95 STS SSP SAVE STACK 
47E1 BE 486 91 LDS SP GET MACHINES 
47E4 B6é 40 94 LDA A PC+L PUSH PC 
47E? 36 PSH A 

47E8 B6 48 93 LOA RA PC 

47EB 36 PSH A 

47EC B6 48 98 LOA A XR+1 PUSH X 
47EF 36 PSH A 

47F@ B6 408 SF LOR A XR 

47F3 36 PSH A 

47F4 B6 48 8D LDA A AR PUSH A 
47F? 36 PSH A 

47F8 B6 48 SE LDA A BR PUSH B 
47FB 36 PSH A ; 

47FC B6é 48 8C LDA R CC PUSH CC 
47FF 36 PSH A 

4800 BF 40 91 STS SP SAVE STACK 
4803 BE 40 95 LDS SSP RESTORE 
4806 39 PONS2 RTS RETURN 


* 
* SET INTERUPT MASK 
* 


4807 86 10 SEIM LOR AR #$16 SET MASK 
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4889 
486C 
480F 


4818 
4812 
4814 
$817 
4819 
4$81C 


4841D 
4820 
4823 
4825 
4828 
482A 
482d 
452F 
4831 
4834 
4836 
4839 


483A 
4830 
4840 
4842 
4844 
4847 


4849 
484B 
4840 
4859 


BR 
B7 
39 


48 
40 


8c 
8c 


15 


933 


7D 
7F 


8c 


AC 


17 


93 


793 
7B 


19 


B89 
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ORA RAR CC OR IT IN 
STA A CC SAVE NEW 
RTS RETURN 
Lal 
* PROCESS SWI INSTRUCTION 
oe 
PSWI BSR PONS PUSH ALL 
- BSR SEIM SET MASK 
LOX SWIY¥ GET VECTOR 
: LDX B, X GET INDIRECT 
PSHI2 STH PC SET IN PC 
PSWI4 RTS RETURN 
* 
* PROCESS IRQ 
oe 
PIRG LDX IRAC RESET COUNTER 
STX IRQCe! 
LDR A #$10 TEST MASK 
BIT A cc 
BEQ PIRQ1 
JMP TRCOLS GO DO NEXT 
PIRQ1L BSR PONS ALL ON STACK 
PIRGEe BSR SEIM SET MASK 
LDX IRAV GET VECTOR 
PIRQA4 LDX B,% GET INDIRECT 
STX PC SET NEW PC 
RTS RETURN 
* 
* PROCESS NMI 
* 
PNMI LDX NMIC RESET COUNT 
STX NMICe2 
BSR PONS ALL ON STACK 
PNMITe BSR SEIM SET MASK 
LDX NMIY¥ GET YECTOR 
BRA PIRQ4 
* ; 
* PROCESS WAI INSTRUCTION 
* 
PWAL BSR PONS PUSH ALL 
PHARI2 LDA A #4 SET WAIT FLAG 
STA A WALTF 
RTS RETURN 


* 
* PROCESS RTI INSTRUCTION 


TSC DEBUG PACKAGE 


$851 
4853 
4836 
4859 
485C 
485D 
4868 
4861 
4864 
4865 
4868 
4869 
4$86C 
486D 
4879 
4871 
4874 
4875 
4878 
487B 
487E 


487F 
4882 


4885 
4886 
4889 
436A 
488B 
488C 
488D 
48398 
4893 
4896 


4899 


4389C 
489E 
48A1 
4+8A4 
48A5 
48A7 
4BA9 
4+8AB 
48AD 
48AF 
48B1i 
48B3 


40 


49 


48 


408 


48 


48 


40 


S93 
45 


40 


SE 


8D 


BF 


98 


33 


94 


95 


C3 
3E 


cS 


ILOPTR 


oe 


LDA 
JSR 
STS 
LOS 
PUL 
STA 
PUL 
STA 
PUL 
STA 
PUL 
STA 
PUL 
STA 
PUL 
STA 
PUL 
STA 
STs 
LDS 
RTS 


LOX 
JMP 


DDIDIVDIDBDIIIBDAID VD BDVBD 


* FIND OPCODE 


* 


FNDOP 


CLR 
STA 
RSL 
ROL 
ASL 
ROL 
ADD 
ADC 
STA 
STA 
LDX 
LDA 
STA 
LOX 
CLR 
LDA 
RAND 
BEQ 
CMP 
BEQ 
CMP 
BEQ 
BRA 


D DPD DD BIDADAWDIAIDIIAIA 


me) 


“7 
CHKSP 
SSP 
SP 
cc 
BR 
AR 
xR 
XR+1 
PC 
PC+1 


SP 
SSP 


#ILOPST 
SIMUL? 


IN TABLE 


OPPNT2+1 


POPTAB+1 
POPTAB 
OPPNT+1 
OPPNT 
OPPNT2 
8. % 
INCOD 
OPPNT 


3X 
#$30 
FNDOP4 
#$30 
FNDOP2 
#$28 
FNDOP3 
FNOOP4 
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SET OFFSET 

CHECK SP 

SAVE STACK 

GET MACHINE STACK 
PULL CC 

PULL B 

PULL A 


PULL X 
PULL PC 


SAVE STACK 
RESTORE 


POINT TO STRING 
GO PRINT IT 


SET POINTER 2 
CALCULATE POSITION 


SET POSITION 
SAVE POSITION 
GET POINTER 
GET CODE 

SAVE CODE 

GET POINTER 


GET CODE BYTE 
MASK LENGTH 


Is IT 37 


Is IT 2? 
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4$8B5 
4+8B6 
48B7 
48B8 
48BB 


48BC 
48BF 
48Ce 
48C4 


4807 
48CA 
48CCc 
48CF 
$801 
4804 
4807 
48D9 
48DC 
48DF 
48E2 
48E4 
48E7 
48EA 
48ED 
4SEF 
48F2 
43F5 
48F3 
43FA 
48FO 
4908 
4963 
4985 
43988 
4968 
498D 
4916 
4913 
4915 
4918 
4918 
491E 
4928 
4923 


48 


9A 


93 
97 


95 


87 
54 


93 


58 


99 
29 


FNDOPe2 
FNDOPS 
FNDOP4 
FNDOPS 
FNDOPG6 


* 


* DUMP 
ae 


DREG 


a 
* PRINT 
* 


PRREG 


PRREG2 


PRRE22 
PRRE2S 


INC B 

INC B 

INC 8B 

STR B OPCNT 
RTS 

REGISTERS COMMAND 
LDX PC 

STX DLDPC 
BSR PRREG2 
JMP EXEC 
REGISTERS 

LDR RAR PRON 
BEQ _FNDOPS 
CMP R NESTC 
BLS FNDOP6 
JSR PCRLF 
LDX #CCST 
BSR PRRE2@2 
LDX #CC 
JSR OUTHEX 
LDX #RST 
BSR PRRE22 
LD% #AR 
JSR OUTHES 
LDX #BST 
BSR PRRE22 
LDX #BR 
JSR OUTHEX 
LDX RXST 
BSR PRRE22 
LDX #R 
JSR QUTADR 
LDX #SPST 
BSR PRRE2@2 
LDX #SP 
JSR OUTADR 
BRA PRRE2S 
JMP POATAL 
LDX #PCST 
BSR PRRE2e 
LDX #PC 
JSR OUTADR 
LDX #NST 
BSR PRRE22 
LOX #NESTC 
JSR OUTHEX 
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SET LENGTH COUNT 


SAYE COUNT 
RETURN 


UPDATE OLD PC 


PRINT REGS 
RETURN TO EXEC 


CHECK TRACE ON 
CHECK NEST LEVEL 


PRINT CR & LF 
PRINT C CODES 


PRINT A 


PRINT 8 


PRINT X 


PRINT SP 


PRINT STRING 
PRINT PC 


PRINT N 
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4926 
4929 
4928 
492E 
4930 
4933 
4936 
4939 
493B 
493E 
4940 
4943 
4946 
4948 
494A 


494D 
494F 
4951 


4954 
4957 
49359 
495B 
4$95D 
495F 
4961 
4963 
4965 
4968 
496A 
496C 
496E 
43970 
4972 
4974 
4976 
4978 
497A 
497D 
497F 
4981 
4983 
4985 
4987 


498A 


8D 


7vE 


00 


41 


AL 
SC 
SF 
29 
AG 
69 
9E 
26 


43 


a9 


AC 


4D 


AC 


TST VFLG 
BEQ PRREGS 
LDX #XVST 
BSR PRRE2@2 
LDX xR 
JSR OUTHEX 
PRREG3 TST FLAGB 
BEQ PRREG4 
L.DX #FMST 
BSR PRRE22 
LDX FLAGA 
JSR OUTADR 
PRREG4 B6SR OUTSP 
BSR OUTSP 
JMP DISO 


a 
* OUTPUT SPACES 
** 


OUT2SP BSR OUTSP 
OUTSP LDR A #29 
PUTCHR 


JMP 


* 
* PROCESS BREAK POINT 
a 


PRBP STX BPPOS 
TST 2.% 
BPL PRBP2 
TST 3. % 
BNE PRBP1L 
LDR A 2. % 
AND A #$?7F 
BNE PRBP1 
JSR RMVYBP 
BRA PRBP3 
PRBP1 LDA A 3.% 
SUB A #1 
STR A 3X 
BCC PRBP4 
DEC 2,% 
BRA PRBP4 
PRBP2 LDX 2% 
BEQ PRBP4 
LDX BPPOS 
LDA A 3. % 
SUB A #1 
STR A 3,% 
Bcc PRBPZ 
DEC 2,% 
PRBP3 JMP SIMUL6 
PRBP4 LOX BPPOS 
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PRINT INDIRECTION? 


POINT TO STRING 
PRINT IT 

GET ADDRESS 
PRINT CONTENTS 
CHECK FLAG OPT 


POINT TO STRING 
PRINT IT 
POINT TO MEMORY 
PRINT IT 


OUTPUT SPACE 


SAVE BP POSITION | 
CHECK COUNT 
FORWARDS? 

COUNT LEFT? 


GET MSB OF COUNT 
MASK DIR BIT 

IS IT ZERO? 

REMOVE BREAK POINT 


GET COUNT 

DEC BY 1 

FIX MSB OF COUNT 
GET COUNT 
RESTORE POSITION 


GET COUNT 
DEC BY 1 


‘FIX MSB . 


RETURN TO SIM 
RESET POINTER 
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498D 
498F 
4998 
4992 
4995 
$997 
4999 
499B 
499E 
499F 
4$9AL1 
49A3 
49A5 
43A7 
49RAR 
49AB 
49AC 
49AD 
49RE 
49RF 
49Ba 
49Be 
49B3 
49B4 
49B5 
49B7 
49B9 
49BA 
43BC 
49BE 
49BF 
49C1 
49C3 
49C5 
49C7 
49CA 
49CC 
49CE 
4$9D9 
49D2 
4$9D5 
49D7 
49DA 
49DD 
49DF 
49E2 
43E4 
' 49E7 
49E9 
49EB 
49EE 
49F4 
49F3 
49F5 


85 


Bg 


Bg 


F9 


AC 


B9 


FF 


AC 


Be 


D1 
Ba 


PRB45 


PRB46 


PRB47 


PRB475 


PRB48 


PRB49 


PRB495 


PRBPS 


PRBSS 


PRBS? 


PRBP6 


LDA 
TAB 
BEQ 
CLR 
RND 
CMP 
BNE 
com 
TsT 
BPL 
LDX 
TST 
BRA 
LDX 
ASR 
ASR 
ASR 
RSR 
PSH 
DEC 
BEQ 
INK 
INK 
DEC 


‘BNE 


LDX 
PUL 
CMP 
BHI 
CLR 
LDA 
BRA 
LDA 
LDA 
LDX 
CMP 
BNE 
CMP 
BNE 
TST 
BEQ 
JMP 
TST 


LDX 
LDA 
STA 
BIT 
BEQ 
JSR 
LDA 
BIT 
BEG 
LDA 


a beodies Bier Berm cde] 


wo 2D UD OUD UW 


DDD 


4.% 


PRBS? 
EQUALS 
#$3 

#2 
PRB45 
EQUALS 


PRB46 
5. % 
QO. % 
PRB495 
#RGTAB 


PRB475 


PRB47 
0B, % 


#4 
PRB48 


QO, x 
PRB49 
8.% 
1,% 
BPPOS 
SX 
PRBSS 
6.% 
PRBSS 
EQUALS 
PRBS? 
SIMUL6 
EQUALS 
PRBPS 
BPPOS 
7% 
BPCODE 
#F2 
PRBP6 
PRREG2 
BPCODE 
#$4 
PRB62 
#$FF 
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GET CONDITIONAL 
NO CONDITION? 


MASK EQUALITY 
Is IT != 


SET FOR NOT-EQUAL 
CHECK MEM REF 


GET ADBRESS 
CHECK IF ZERO 


POINT TO TABLE 
ADJUST REG SPEC 


SAVYE REG SPEC 


FIND IN TABLE 
DEC THE COUNT 
GET REG POSITION 
RESTORE REG SPEC 
SINGLE BYTE REG? 


CLEAR MSB 
GET VALUE 


GET @ BYTE VALUE 


RESET POINTER 
COMPARE VALUES 


TEST EQUALITY 


NO COMPARE 
TEST EQUALITY 


POINT TO BP 
GET ACTION CODE 
SAVE IT 

PRINT REGISTERS? 


PRINT REGISTERS 
GET CODE 
TRACE ON? 


SET COUNT 
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4926 
4929 
4928 
492E 
4930 
4933 
4936 
4939 
4$93B 
493E 
4948 
4943 
4946 
4948 
494A 


494D 
494F 
49541 


4954 
4957 
4959 
4938 
495D 
495F 
4961 
4963 
4965 
4968 
496—A 
496C 
496E 
4970 
4972 
4974 
4976 
4978 
497—A 
497D 
497F 
4981 
4983 
4985 
4937 
496A 


8D 


7E 


40 AL 
S33 SC 
40 SF 
43 29 
48 AQ 
S93 68 
48 9E 
43 26 


4A 43 


41 @9 


48 AC 


Si 4D 


40 AC 


TST VFLG 
BEQ PRREGS 
LOX #XVST 
BSR PRRE22 
LDX xR 
JSR OUTHEX 
PRREG3 TST FLAGB 
BEQ PRREG4 
LDX #FMST 
BSR PRRE22 
“LDX FLAGA 
JSR OUTADR 
PRREG4 BSR OUTSP 
BSR OUTSP 
JMP DISsO 


rm 
* QUTPUT SPACES 
* 


OUT2SP BSR OUTSP 
OUTSP LDA A #$20 
JMP PUTCHR 


* 
* PROCESS BREAK POINT 
a 


PRBP STX BPPOS 
TST 2. % 
BPL PRBP2 
TST 31% 
BNE PRBPL 
LDA A 2k 
RAND A #$7F 
BNE PRBP1L 
JSR RMYBP 
BRA PRBPS 
PRBPL LOR R 3% 
SUB A #1 
STR A SK 
BCC PRBP4 
DEC 2.% 
BRA PREP4 
PRBPe2 LOX 2.% 
BEQ PRBP4 
LDX BPPOS 
LOR A 3% 
SUB A #1 
STAR A 3% 
Bcc PRBP3 
DEC 2.% 
PRBPS JMP SIMUL6 
PRBP4 LDX BPPOS 
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PRINT INDIRECTION? 


POINT TO STRING 
PRINT IT 

GET ADDRESS 
PRINT CONTENTS 
CHECK FLAG OPT 


POINT TO STRING 
PRINT IT 
POINT TO MEMORY 
PRINT IT 


OUTPUT SPACE 


SAYE BP POSITION 
CHECK COUNT 
FORWARDS? 

COUNT LEFT? 


GET MSB OF COUNT 
MASK DIR BIT 

Is IT ZERO? 

REMOVE BREAK POINT 


GET COUNT 

DEC BY 1 

FIX MSB OF COUNT 
GET COUNT 
RESTORE POSITION 


GET COUNT 
DEC BY 1 


FIX MSB 
RETURN TO SIM 
RESET POINTER 


TSC DEBUG PACKAGE 


4980 
498F 
4990 


4992 | 


4995 
$997 
4999 
499B 
499E 
499F 
49A1 
49A3 
49A5 
49A7 
43AR 
49AB 
43AC 
49AD 
49AE 
4S9AF 
4969 
49Be 
49B3 
49B4 
49B5 
4+9B?7 
49B9 
4968A 
49BC 
49BE 
49BF 
49C1 
4903 
4905 
49C7 
49CRA 
49CC 
49CE 
4908 
49D2 
49D5 
49D7 
49DA 
42DD 
49DF 
49E2 
49E4 
49E7 
49E9 
49EB 
4$9EE 
4SF1 
49F3 
49F5 


85 


Bg 


Bg 


FS 


AC 


BS 


FF 
BS 


AC 


Ba 


b1 
Ba 


PRB45 


PRB46 


PRB47 


PRB475 


PRB48 


PRB49 


PRB495 


PRBPS 


PRBSS 


PRBS7 


PRBP6 


LDA 
TRB 
BEQ 
CLR 
RAND 
CMP 
BNE 
com 
TST 
BPL 


TST 
BRA 
LDX 
ASR 
ASR 
ASR 
ASR 
PSH 
DEC 
BEQ 
INK 
INK 
DEC 
BNE 
LBX 
PUL 
CMP 
BHI 
CLR 
LDA 
BRA 
LDA 
LDA 
LDX 
CMP 
BNE 
CMP 
BNE 
TST 
BEQ 
JMP 
TST 
BEQ 
LOX 
LDA 
STA 
BIT 
BEQ 
JSR 
LDA 
BIT 
BEQ 
LDA 


Lee das] bat) Bua oava 


ona 


oD 


DBD 


4.% 


PRBS? 
EQUALS 
#33 

#2 
PRB45 
EQUALS 


PRB46 
5. ¥ 
QB. 4 
PRB495 
#RGTAB 


PRB475 


PRB47 
a, % 


#4 
PRB48 


@, x 
PRB49 
@.% 
1, x 
BPPOS 
5,% 
PRBSS 
6, x 
PRESS 
EQUALS 
PRBS7 
SIMUL6 
EQUALS 
PREPS 
BPPOS 
7,X 
BPCODE 
#$2 
PRBP6 
PRREG2 
BPCODE 
#$4 
PRB62 
#$FF 
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GET CONDITIONAL 
NO CONDITION? 


MASK EQUALITY 


‘Is IT != 


SET FOR NOT-EQUAL 
CHECK MEM REF 


GET ADDRESS 
CHECK IF ZERO 


POINT TO TABLE 
ADJUST REG SPEC 


SAVE REG SPEC 


FIND IN TABLE 
DEC THE COUNT 
GET REG POSITION 
RESTORE REG SPEC 
SINGLE BYTE REG? 


CLEAR MSB 
GET VALUE 


GET 2 BYTE VALUE 


RESET POINTER 
COMPRRE YALUES 


TEST EQUALITY 


NO COMPARE 
TEST EQUALITY 


POINT TO BP 

GET ACTION CODE 
SAVE IT 

PRINT REGISTERS? 


PRINT REGISTERS 
GET CODE 
TRACE ON? 


SET COUNT 
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49F7 
49FA 
49FD 
49FF 
4AG1 
4RO4 
4AQ7 
4RAQ9 
4RAOB 
4AGE 
4A11 
4R14 
4AL7 
4A1L9 
4A1B 
4A1E 
4A28 
4R22 
4A24 
4A26 
4A28 
4A2A 
4ARec 
4A2E 
4ASL 
4A34 
4A36 
4A39 
4A3C 
4ASE 
4A49 


F? 
49 


OF 
13 


9D 
9c 


3c 
9D 


93 
98 


85 
BO 


35 


B89 


4F 
B8 


PRB62 


PRB6ES 


PRB68 


PRBP? 


PRB75S 


PRBP9 


a 


STA 
STA 
BIT 
BEQ 
CLR 
CLR 
BIT 
BEQ 
LDX 
STX 
STX 
LDX 
BIT 
BEQ 
LDX 
INC 
BNE 
INC 
BIT 
BNE 
BIT 
BEQ 
LDX 
STX 
JMP 
LDX 
JSR 
LDA 
BIT 
BEQ 
JMP 


>D OD 


* DISASSEMBLE 


ba 


DISO 


brsot 


orsoe2 


LDX 
LDA 
JSR 
LDX 
JSR 
JSR 
LDX 
LDA 
LDA 
JSR 
INX 
DEC 
BNE 
JSR 
LDA 
TBA 
AND 
BEQ 


TRCF 
PRON 
#$38 
PRB6S 
PRON 
TRCF 
#$19 
PRBG6S 
#0 
STATES 
STATES+2 
BPPOS 
#$20 
PRBP? 
BPPOS 
6. % 
PRBP? 
3. % 
#346 
PRB7S 
#$30 
PRBP9 
5. X 

PC 
SIMUL2 
Ss % 
PSTRNG 
BPCODE 
#$1 
PREPS 
EXEC 


ONE LINE 


OLDPC 
QB. X 
FNDOP 
#OLDPC 
OUTADR 
OUTSP 
OPPNT 
#3 

a, % 
PUTCHR 


prsoe 
OUTSP 
INCOD 


#$F 
DISo4 
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SET TRACE ON 
TRACE OFF? 


TRACE OFF 
RESET STATE COUNTER? 


SET UP. ZERO 
SET STATES 


RESET POINTER 
HISTOGRAM? 


RESET POSITION 
BUMP COUNTER 
CARRY? 


MESSAGE? 
JUMP TYPE? 


GET TRANSFER ADDRESS 
SET NEW PC 

GO TRACE 

GET MSG ADDRESS 
PRINT MESSAGE 

GET CODE 

CHECK FOR HALT 


RETURN TO EXEC 


GET PC 

GET OPCODE 
FIND OPERAND 
POINT TO PC 
PRINT IT 
PRINT SPACE 
GET POINTER 
SET COUNT 
GET CHARACTER 
OUTPUT IT 
BUMP TO NEXT 


PRINT SPACE 
GET CODE 


MASK CODE 


TSC DEBUG PACKAGE 


4A6D 81 O41 
4A6F 27 @8 
4A71 81 02 
4A73 26 @B 
4A75 86 42 
4A77 20 02 
4A79 86 41 
4A7B BD 44 a9 
4A7E 20 03 
4A8@ BD 49 4F 
4A83 BD 49 4F 
4A86 17 

4A87 84 72 
4A89 27 1E 
4ASB 81 10 
4A8D 26 22 
4AS8F 86 23 
4A941 BD 44 09 
.4A94 FE 40 97 
4A97 @8 

4A98 86 24 
4ASA BD 44 29 
4A9D F6 48 9A 
4AAG C1 O2 
4AR2 27 8 
4AAR4 BD 43 26 
4AA7 20 SB 
4AAS FE 40 97 
4AAC BD 43 29 
4RAF 20 53 
4AB1 81 20 
4AB3 27 DF 
4ABS 81 30 
4AB? 26 1A 
4ABS FE 40 97 
4ABC AG O41 
4ABE B7 48 SE 
4AC1 SF 

4AC2 F? 40 5D 
4AC5 CE 4@ 5D 
4AC8 BD 42 DS 
4ACB CE 59 933 
4ACE BD 42 87 
4AD1 20 34 
4AD3 81 40 
4AD5 27 BD 
4AD? 81 62 
4AD9 26 29 
4ADB FE 40 97 
4ADE SF 

4ADF AG O41 
4RE1 36 

4AE2 @8 

4AE3 98 


bISos 
. DISOSS 


DISo4 
DISO45 


DISO47 


PADR 
PADR2 
PERR 
PBYTE 
OISOS 


DISOSS 


DISO6 


CMP 
BEQ 
CMP 
BNE 
LDA 
BRA 
LDA 
JSR 
BRA 
JSR 
JSR 
TBA 
AND 
BEQ 
CMP 
BNE 
LDA 
JSR 
LOX 
INK 
LDA 
JSR 
LDA 
CMP 
BEQ 
JSR 
BRA 
LDX 
JSR 
BRA 
CMP 
BEQ 
CMP 
BNE 
LD* 
LDA 
STA 
CLR 
STA 
LDX 
JSR 
LDA 
JSR 
BRA 
CMP 
BEQ 
CMP 
BNE 
LD® 
CLR 
LOA 
PSH 
INS 
INX 


Lae Bas) 


2D 


nuoODD 


DD. 


#1 
DISOS 
#2 
DISO4 
#°B 
DPISO3S 
#°R 
PUTCHR 
DISO45 


OUTSP 


OUTSP 


#$73 
PERR 
#318 
DISOS 
#°# 
PUTCHR 
OLDPC 


#°S 
PUTCHR 
DPCNT 
#2 
PBYTE 
OUTRDR 
DISO7 
OLDPC 
OUTHEX 
DISO? 
#$28 
DISO4? 
#$30 
DISO06 
OLDPC 
1,% 
VALUE+2L 


VALUE 
#VALUE 
OUTDEC 
#IAST 
PDATAL 
DISO? 
#$40 
bIS047 
#%60 
DISO7 
OLDPC 


1,% 


TSC ASSEMBLER PAGE 28 


CHECK FOR A OR B 


CHECK FOR B 
SETUP “B” 


SETUP ‘A’ 
PRINT IT 


PRINT SPACE 


CHECK ADDRESS MODE 
IMMEDIATE? 

OUTPUT °#- 
GET PC 
OUTPUT “$7” 


GET OP LENGTH 
Is IT 2? 


PRINT ADDRESS 


POINT TO BYTE 
PRINT BYTE 


DIRECT? 
INDEXED? 


GET PC 
GET OFFSET 


CLEAR FLAG 

SET TO ZERO 
POINT TO IT 
PRINT OFFSET 
POINT TO STRING 
PRINT IT 


EXTENDED? 


‘GET PC 


GET OFFSET 
SAVE IT 
BUMP TO NEW PC 


TSC DEBUG PACKAGE 


4RE4 
SRE? 
4REA 
4RED 
4AFO 
4RF3 
4RF 4 
4AFS 
SAF 7 
4AFR 
4AFC 
4AFF 
4B82 
4B04 
4Ba7 
4BOA 
4B6B 
4BOC 
4BOE 
4811 


4B1i2 
4B15 


4818 — 


4B1B 
4B1E 
4Be1 
4B23 
4B25 
4Be8 
4B2A 
4B2aD 
4Ber 
4B31 
4B34 
4B37 
4B3A 
4B3D 
4B40 
4B43 
4B45 
4B48 
4B4B 
4B4E 
4B50 
4B53 
4B56 
4B59 
4B5B8 
4B5D 


40 
48 
42 
48 
48 


BA 


a9 


‘BA 


9~A 
97 


97 


OoISO6? 


DISO?7 


DISOs 


ne 


* CHECK 
* 


PRCH 


PRCH2 


PRCH3 


PRCH4 


STX 
ADD 
ADC 
STA 
STA 
PUL 
TST 
BPL 
DEC 
LDA 
JSR 
LOX 
BRA 
LDA B 
LDX 

INX 

DEC B 
BNE 

STX 

RTS 


DVIODOD 


D> 


PROTECTION TABLES 


LDA A 
LDA B 
LDX 
STR 
LDX 
BSR 
BNE 
LDX 
BRA 
LDA A 
BSR 
BNE 
LDX 
JSR 
LDX 
JSR 
JMP 
JSR 
BCS 
LDR A 
LDA B 
TST 
BPL 
LDX 
STX 
LDX 
BSR 
BNE 
LDX 


RELADR 
RELADR+1 
RELADR. 
RELADR+1 
RELADR 


DIS067 
RELADR 
a°S 
PUTCHR 
#RELADR 
PADR 
OPCNT 
OLDPC 


DISOS 
OL.DPC 


PC 
PC+1 
EXEND 
TRBE 
#EXTAB 
CHECK 
PRCH2 
#EXPST 
PRCH3 
PC 

MPR 
PRCH4 
#MMPLST 
PSTRNG 
#PC 
OUTADR 
EXEC 
CER 
CHECK6 
EADR 
EADR+1 
INCOD 
PRCHS 
WPEND 
TABE 
#WPTRB 
CHECK 
PRCHS 
#WPST 
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SAVE ADDRESS 
ADD IN OFFSET 


SAVE RESULT 


GET OFFSET 
Is IT PLUS? 


ADJUST ADDR. 
PRINT “$7” 


POINT TO ADDRESS 
PRINT IT 
GET LENGTH 


BUMP PC 
DEC THE COUNT 


FIX PC 
RETURN 


GET PC 
SET TAB END 


POINT TO EX TABLE 
GO CHECK ENTRY 
FOUND? , 
POINT TO STRING 


GET PC 

CHECK MEM PROT 
FOUND? 

POINT TO STRING 
PRINT IT 

POINT TO PC 


PRINT ADPDRESS 
RETURN TO EXEC 
FIND E. A. 
FOUND? 

GET ADDRESS 


WRITE CODE? - 

SET TABLE END 
POINT TO WP TABLE 
GO CHECK ENTRY 


FOUND? 
POINT TO STRING 
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4660 
4B62 
4B65 
4B67 
4B69 
4B6C 


4BG6E 
4B71 


4B74- 


4B77 
4B7A 
4B7C 
4$B7E 
4886 
4882 
4B84 
4B86 
46888 
4B8A 
4B8C 
4BSE 
4B98 
4B92 
4B93 
4B94 
4B95 
4B96 
4B97 
4B98 
4B9A 
4B9C 


4B9D 
4+BRO 
4BA2 
4+BA4 
4BA6 
4BAR8 
4BAR 
4BRD 


FE 


CE 


40 


3F 


DD 
o1 


08 


26 


cc 


68 


CE 


BS 


BRA 
PRCHS LDA 
BSR 
BNE 
LDX 
BRA 


* 
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PRCH3 

A EADR GET ADDRESS 
MPR CHECK MEM PROT 
CHECKS FOUND? 
#MMP2ST POINT TO STRING 
PRCH3 


* CHECK MEMORY PROTECT TABLE 


* 


MPR LDH 
ST 
LDX 


* 


* CHECK FOR 
a 


CHECK CPX 
BEQ 
CMP 
BLO 
BHI 
CMP 
BLO 
BEQ 
CHECK2 CMP 
BHI 
BLO 
CMP 
BHI 
CHECK3 CLR 
RTS 
CHECK4 INX 
INK 
INX 
INK 
BRA 
CHECKS LDA 
CHECK6 RTS 


” 
* CALCULATE 
* 


CEA LDA 
AND 
CMP 
BLS 
CMP 
BHS 
CLR 
CLR 


MEND SET END 
TRABE 
#MTAB POINT TO TABLE 


ADDRESS IN PR TABLE 


TABE END OF TABLE? 
CHECKS 
RAR 8.% CHECK 1ST ENTRY 
CHECK4 
CHECKe 
B 1.% 
CHECK4 
CHECKS 
A 2% CHECK @ND ENTRY 
CHECK4 
CHECKS 
B 3% 
CHECK4 
A SHOW FOUND 
RETURN 
MOVE TO NEXT 


CHECK REPEAT 
RAR #1 SHOW NO FIND 
RETURN 


EFFECTIVE ADDRESS 


INCOO GET CODE 


A 

RA #$76 MASK BITS 

A #$106 CHECK TYPES 
CEAG 

A #€$5a 
CEAG 
EADR ZERO —. A. AREA 
EADR+1 
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4BBO 
4BB3 
4BB6 
4BBS 
4BBA 
¢+BBC 
4BBE 
4BCO 
4BC3 
4BC6 
4BC9 
4BCC 
4BCE 
4BD1 
4BD3 
4BDS 
4BD?7 
4BD9 
4BDA 
4BbC 
4BDF 
4BE2 
4BE3 
4BE4 
4BES 


4BE6 
4BE9 
4BEC 
4BEF 
4BFe2 
4BF4 
4BF7 
4BF9 
4BFC 
4BFF 
402 
4085 
4C88 
4COB 
4COE 
4COF 
4012 
4014 
4017 
4C1A 
4cic 
4C1E 
4C2e 
4C2e 


B? 
FE 
81 
2? 
84 
2? 
AG 
FE 
FF 
BB 
B? 
24 
7¢ 


40 
42 


Re 
93 


BF 
De 
D1 
D1 


Da 


De 
DL 


AS 


STA A EAFL 
LDX PC 
CMP A #$40 
BEQ CERe 
CMP AR #$20 
BEQ CEAS 
LDR A 1, 
LDX xR 
STX ERDR 
AOD A EADR+1 
STA A EARDR+1 
BCC CEAS 
INC ERDR 
BRA CEAS 
CERe LOR A 141. 
LDA B 2. 
BRA CEA4 
CEAS CLR A 
LDA B 4. 
CEA4 STA A ERADR 
STA B EADR+1 
CEAS CLC 
RTS 
CEAG SEC 
RTS 
* 
* SET SINGLE STEP MODE 
* 
SSM JSR PCRLF 
LDX #1 
STX STPCNT 
JSR TSTTRM 
BEQ SSM1 
JSR INDEC 
BCS EQVALe 
ST STPCNT 
SSML LOX STPCNT 
STX SIMCNT 
SSM15 JSR TRCOL 
LDX PC 
STA OLDPC 
LDX SIMCNT 
DEX 
STX SIMCNT 
BNE SSM15 
JSR PRREG2 
SSM3 JSR GETCHR 
CMP A #$D 
BEQ ssme 
CMP A ##20 
BNE SSM3 
STA RAR NOBKF 
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SET FLAG 

GET PC 

EXTENDED? 


DIRECT? 


INDEXED 

GET INDEX REG 
SAVE VALUE 
ADD IN OFFSET 
SAVE RESULT 


GET EXT ADDRES 


CLEAR FOR DIRECT 
GET ADDRESS 
SET ADDRESS 


SHOW ADDRESS 
RETURN 
SHOW NO ADDRESS 


PRINT CR & LF 
SET DEFAULT 


CHECK TERM 


GET COUNT 
ERROR? 

SET COUNT 
RESET COUNTER 


TRACE ONE LINE 
RESET PC 


GET COUNTER 
DEC BY 1 

SAVE NEW 
PRINT REGS 
GET CHARACTER 
IS IT CR? 

Is IT SPACE? 


SET NO BREAK 


TSC DEBUG PACKAGE 


4C25 20 05 
4Ce7r 7E 41 


4Ce2Ar 
4$Cec 
4C2eé 
$031 
4033 
4034 


4C37 
4C39 
4C3B 
4C3E 
4040 


4041 
4043 
4046 
4049 
4$C4C 
4C4E 
4c31 


4053 
4055 
4058 
4CSB 


4050 
4068 
4C62 


Bé 


39 


48 
3D 


935 


EE 


CE 


BS 


SE 
AS 


68 


BRA SSM4 

ssM2 IMP EXEC 

* 

* CHECK EQUALS VALUE 

Bd 

EQVAL BSR TSTEQ 
BNE EQVAL2 
JSR INDEC 
BCS EQvAL2 
RTS 

EQVAL2 JMP SYNER 

4 

* CHECK HEX EQUALS VALUE 

* 

HEQVAL BSR TSTEQ 
BNE EQVAL2 
JSR GETHEX 
BCS EQVAL2 
RTS 


* 
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RETURN TO EXEC 


TEST FOR EQUALS 
ERROR? 

GET COUNT 
ERROR? 


REPORT ERROR 


CHECK FOR EQUALS 
ERROR? 

GET HEX VALUE 
ERROR? 

RETURN 


* SET INSTRUCTION COUNT TRAP 


* 


INST BSR EQVAL 
CLR CFLG 
STA COUNT 
STH MAXC 
BEQ INST2 
INC CFLG 

INST2 BRA SSMe 


*” 
* SET NEST TRAP 
* 


NEST BSR EQVAL 
LDR A YALUE+L1 
STA A NSTRP 
BRA INSTe 


* 
* TEST FOR EQUALS 
a 


LOA A LSTTRM 
CMP A #%= 
RTS 


TSTEQ 


TEST VALUE 
CLEAR FLAG 
SAVE COUNT 
SET VALUE 
Is IT ZERO? 
SET MODE 
RETURN 


TEST VALUE 
GET VALUE 
SAVE COUNT 


CHECK TERM 
Is IT EQUALS? 
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4063 
4C66 
4C68 


4C69 
4C6B 
4C6D 
4C79 
4c72 
4074 
4076 
4079 
4C7B 
4C7D 


4C7E 
4C81 
4094 
4C87 
4C8A 


4csc 
4CSF 
4092 
4095 
4C97 
4C9OA 
4C9C 
4C9OF 
4cARe 
4CAS 
4CAg 
4CAR 
4CAD 
4CRE 
4CAF 
4CB2 
4CB4 
4CB? 


B6 


39 


46 68 


20 


59 
42 
40 


cS 


61 


61 


67 


61 


* TEST TERMINATOR 
ate 


TSTTRM LDA A LSTTRM 
CMP A #$D 
RTS 


* 
* TEST FOR ON OR OFF 
* 


TSTON BSR TSTEQ 
BNE EQVAL2 
JSR NXTCH 
AND A #$5F 
CMP RAR #°0 
BNE EQVALe2 
JSR NXTCH 
AND RO #S$5F 
CMP A #°N 
RTS 

* 

* PRINT TRAIL REGISTER 

* 

TRAIL LOX #TRST 
JSR PSTRNG 
LDX #LASTJ 
JSR OUTRDBR 
BRA INST2 

* 

* PRINT 

bd 

PAST JSR PCRLF 
CLR CNTR 
JSR TSTTRM 
BEQ PASTe 
JSR INDEC 
BcS PAST6 
LOA A VYVALUE+2 
STA RA CNTR 

PASTe LDX NXTPC 

PAST25 CPx #STRTPC 
BNE PASTS 
LDX #ENDPC 

PASTS DEX ; 
DEX 
DEC CNTR 
BNE PAST2S 

PAST4 STX POINT2 
LOX Q.% 


TSC ASSEMBLER PAGE 33 


GET TERM 
IS IT CR? 
RETURN 


TEST FOR EQUALS 
ERROR? 

GET CHARACTER 
MAKE UPPER 

Is IT “0°? 
ERROR? 

GET CHARACTER 
Is IT “N’? 
RETURN 


POINT TO STRING 
PRINT IT 

GET VALUE 

PRINT IT 

RETURN 


PAST EXECUTION INSTRUCTIONS 


PRINT CR & LF 
CLEAR COUNT 
TEST TERM 


INPUT COUNT 

GET VALUE 

SET COUNT 

GET POSITION 
TABLE BEGINNING? 


RESET POINTER 
MOVE BACK ONE INST 


DEC THE COUNT 


SRACE POSITION 
GET AODRESS 
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. 4CB9 
4CBC 
4CBF 
4CC2 
$ccs 
4CCcé 
4CC7 
4CCA 
4CCC 
4CCF 
4Cbe 
4CD4 
4007 
4CDA 


4CDD 
4CEO 
4CE2 
4CES 
4CE8 
4CEB 
4CEE 
4CFQ 
4CF3 
4CF5 
4CF8 


4CF9 
4CFB 
4CFE 
4008 
4De2 
4D04 
4006 
4068 
4D0A 
4DeCc 
4D0E 
4010 
4013 
4D16 
4019 
401B 
4010 
4b29 
4B2e2 


88 


88 
ca 


94 


CE 


61 


CE 
cé 
20 
C6 


cs 


STX OLDPC 
JSR PCRLF 
JSR DIso 
LDX POINT2 
INK 
INS 
CPX #ENDPC 
BNE PASTS 
LDX #STRTPC 
PASTS CPXK NXTPC 
BNE PAST4 
JSR PCRLF 
JMP EXEC 
PAST6 JMP SYNER 


+ 
* GET ADDRESS RANGE 
* 


GETRNG JSR GETHEX 
BCS PROT3 
ST FIRST 
STH LAST 
JSR PRYW 
JSR TSTHEX 
BcsS GETRN2 
JSR GETHEX 
BCS PROTS 
STX LAST 

GETRN@ RTS 


* 
* SET PROTECTION FIELDS 
* 


PROT BSR GETRNG 
PROT2 JSR NaTCH 
AND RO #$5F 
CMP A #°X 
BEQ PROT4 
CMP A #°W 
BEQ PROTS 
CMP A #°M 
BEQ PROT6 
CMP A #’°S 
BEQ PROTSS 
PROTS3 JMP SYNER 
PROT3SS Lox SMEND 
CPX #EXTAB 
BEQ PROTS 
BSR SETY 
STH SMEND 
BRA PROT? 
PROT4 LDX EXEND 
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SET PC 

PRINT CR & LF 

DISASSEMBLE 

GET POINTER 

MOVE TO NEXT 


END OF TABLE? 


RESET POINTER 
FINISHED? 
REPEAT 

PRINT CR & LF 
RETURN 

REPORT ERROR 


GET RADORESS 
ERROR? 
SAYE VALUE 


CHECK CHARACTER 
Is IT HEX? 


GET NEXT ADDRESS 


SAVE VALUE 
RETURN 


GET ADDRESSES 
GET CHARACTER 
MAKE UPPER C 

IS IT EX? 

Is IT WP? 

IS IT MEM? 

IS IT SIM P? 
REPORT ERROR 
GET END POINTER 
FULL? 


SET VYRLUES 
SAVE END 


GET END POINTER 
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CPX 


4D25 8C 3F 40 
4De8 27 2D BEQ 
4D2A 8D 34 BSR 
4D2c FF 4@ ce STX 
4D2F 20 1C BRA 
4D31 FE 40 CA PROTS  LDX 
4034 8C 3F 68 CPX 
4D37 27 41E BEQ 
4D39 8D 22 BSR 
4D3B FF 4@ CA STX 
403E 28 @D BRA 
4040 FE 4@ CC PROT6  LDX 
4043 8C 3F 8a CPX 
4D46 27 OF BEQ 
4048 8D 13 BSR 
404A FF 40 CC STX 
4D4D BD 43 61 PROT7 JSR 
4D59 BD 4c 63 JSR 
4D53 26 Ad BNE 
4D55 28 28 BRA 
4D57 CE SA 44 PROTS  LDX 
405A 7E 414 C9 IMP 

* 

* SET VALUES 

ae 
4D5D B6 40 63 SETV LDA A 
4060 F6 40 64 LDA B 
4D63 8D 06 BSR 
4065 B6 40 65 LDA A 
4D68 F6 40 66 LDA B 

A 

* STORE VALUES 

oe 
4D6B A7 eo STRIT STA A 
4D6D E7 @1 STA B 
4D6F 98 INX 
4D72 98 INK 
4D71 39 RTS 

A 

* SET MODE 

*# 
4D72 BD 4C 2A CMODE JSR 
4075 B6é 40 SE LDA A 
4078 84 O41 CMP A 
4D7A 22 06 BHI 
4D7C B7 40 9B CMODES STARA 
4D7F 7E 44 95 CMOD35 JMP 
4D82 7E 41 CE CMODE4 JMP 


#WPTAB 
PROTS 
SETY 
EXEND — 
PROT? 
WPEND 
*MTAB 
PROTS 
SETY 
WPEND 
PROT? 
MEND 
#MSGTB 
PROTS 
SETY 
MEND 
NXTCH 
TSTTRM 
PROT 
CMOD35 
#TBLOY 
ILIN2 


FIRST 
FIRST+1 
STRIT 
LAST 
LAST+1 


EQVAL 
VALUE+4 


CMODE4 
MODE 
EXEC 
SYNER 
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FULL? 


SET VALUES 
SAVE END 


GET END P 
FULL? 


SET VALUES 
SAVE END 


GET END P 
FULL? 


SET VALUES 
SAVE END 

GET NEXT CHAR 
Is IT TERM? 
REPEAT? 


POINT TO STRING 
GO PRINT IT 


GET FIRST 


GO STORE 
GET LAST 


SAVE CHARACTER 
BUMP POINTER 


RETURN 


GET VALUE 
GET VALUE 
CHECK RANGE 


SET MODE 
RETURN 
REPORT ERROR 
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* 
* PRINT PROTECTION BOUNDS 
* 


4085 BO 4C 63 BOUNDS JSR TSTTRM TEST TERM CHAR 


4D88 26 16 BNE BOUND2 
4D8A BD 42 94 JSR PCRLF PRINT CR & LF 
4D8D 8D 55 BSR BOUNDX PRINT X TRB 
4D8F BD 42 94 JSR PCRLF DO CR & LF 

4092 8D 68 BSR BOUNDW PRINT W TAB 
4094 BD 42 94 JSR PCRLF CR & LF 

4097 8D 6B BSR BOUNDM PRINT M TAB 
4099 BD 42 94 JSR PCRLF 

4D9C 8D 36 BSR BOUNS PRINT S TAB 
409E 20 2E BRA BOUNDS 

4DAQ@ BD 42 94 BOUND2 JSR PCRLF PRINT CR & LF 
4DA3 BD 43 61 JSR NXTCH GET NEXT CHARACTER 
4DA6 84 5F AND A #$5F MASK TO UPPER 
4DA8 81 53 CMP A #°S Is IT SIM P? 
4DAA 27 OF BER BOUN35 

4DAC 81 58 CMP A #°X IS IT Ex? 

4D0AE 27 OF BEQ BOUND4 

4DB8 81 57 CMP A #°HW IS IT WP? 

4DB2 27 OF BEG BOUNDS 

4DB4 81 4D CMP A #°M IS IT MEM P? 
4086 27 OF BEQ BOUNDS 

40B8 7E 41 CE BOUNDS JMP SYNER REPORT ERROR 
4088 8D 17 BOUN35S BSR BOUNS PRINT S$ 

4DBD 20 6A BRA BOUND? 

4DBF 8D 23 BOUND4 B6SR BOUNDS PRINT X 

40C1 20 06 BRA BOUND? 

40C3 8D 2F BOUNDS 8SR BOUNDW PRINT W 

40C5 20 @2 BRA BOUND? 

40C7 8D 38 BOUND6 BSR BOUNCM PRINT M 

4DC9 BD 4C 63 BOUND? JSR TSTTRM TEST TERM 

4DCC 26 be BNE BOUND2 REPEAT? 

4DCE BD 42 94 BOUNDS JSR PCRLF PRINT CR & LF 
4001 7E 41 95 JMP EXEC RETURN 

4004 CE SA 68 BOUNS LOX #SMPST POINT TO STRING 
4DD7 8D 59 BSR PBPRT 

4009 FE 46 C6 LDX SMEND SET END POINT 
4D0C FF 40 CE STX TABE 

4D0F CE 3F 08 LDX #SMTAB POINT TO TABLE 
4DE2 20 2E BRA PRTB PRINT TABLE 
4DE4 CE SA 59 BOUNDX LDX #XPST POINT TO STRING 
4DE7 8D 49 BSR PBPRT 

4DE9 FE 48 C8 LDX EXEND SET END POINTER 
4DEC FF 40 CE STX TABE 

4DEF CE 3F 20 LDX #EXTAB POINT TO TABLE 
40F2 20 1E BRA PRTB PRINT TABLE 
40F4 CE SA 53 BOUNDW LDX #LIPRST POINT TO STRING 
40F7 8D 39 BSR FBPRT 


4DF9 FE 46 CA LBM WPEND SET END P 
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4DFC FF 40 CE STX TRBE 

4DFF CE 3F 48 LDX #WPTAB POINT TO TABLE 
4E02 20 GE BRA PRTB PRINT TABLE 
4E04¢ CE SA 61 BOUNDM LDX #MPST POINT TO STRING 
4E07 80 29 BSR PBPRT 

4E09 FE 46 CC LDX MEND SET END 

4EOC FF 40 CE STX TABE 

4EQOF CE 3F 69 LOX #MTRB POINT TO TABLE 


1 
* PRINT PROT TABLE 
* 


4E12 BD 42 94 PRTB JSR PCRLF PRINT CR & LF 
$E15 BC 46 CE PRTB1 CPX TRBE END OF TABLE? 
4E18 27 15 BEQ PRTB2 

4E1A BD 42 94 JSR PCRLF PRINT CR & LF 
4E1D BD 49 4D JSR OUTeSP 

4E2@ BD 43 26 JSR OUTADR PRINT ADDRESS 
4E23 08 INX BUMP POINTER 
4E24 86 2b LDR A’ OUTPUT “-”% 
4E26 BD 41 89 JSR PUTCHR 

4E29 BD 43 26 JSR OUTADR PRINT ADDRESS 
4E2c 08 INX BUMP TO NEXT 
4E2D 20 E6 BRA PRTB1L REPEAT 

4E2F 7E 43 61 PRTB2 JMP NXTCH GET NEXT CHAR 


* 
* PRINT PROTECTION STRING 
* 


4E32 BD 42 85 PBPRT JSR PSTRNG PRINT STRING 
4E35 CE SA 71 LDX #PRTSTR POINT TO PROT 
4E38 7E 42 87 JMP PDATRL PRINT IT 


* 
* TRAP ON NEST COUNT 
* 


4E3B CE SA 7D TRNEST LDX #NSTST POINT TO STRING 
4E3E 20 19 BRA NSTER2 REPORT ERROR 


* 
* SET TRANSFER TRAP 
* 


4E40 BD 4C 69 STXFR JSR TSTON TEST ON/OFF 
4E43 27 85 BEQ STXFR2 

4E45 7F 48 AG CLR XFRT TURN OFF 
4E48 20 36 BRA RTRNL RETURN 

4E4A 86 61 STXFR@ LOA A #1 TURN ON 
4E4C B7 46 AG STA A XFRT SET FLAG 


4E4F 20 2F BRA RTRN1 
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4ES1 
4E54 


4E56 
4E59 


$ESC 
4ESF 
4E61 
4E64 
4E66 
4E69 
4E6C 
4E6F 
4E70 
4E72 
4E74 
4E77 
4E7A 
4E7D 
4E8o 
4E83 
4E86 
4E89 
4ES8B 


4ESE 
$E91 
E93 
4E96 
4E99 
4E9C 
4E9F 
4EA2 
4EAS 
4EAS 
4EAB 
4EAE 


CE 
20 


CE 
7E 


SA 
Q3 


SA 
45 


BS 


89 
SE 


a 
* REPORT XFR TRAP 
* 


#XFRST 
NSTER2 


LDX 
BRA 


XxFRTRP 


* 
* REPORT NEST ERROR 
* 


NSTER LDX #NERST 

NSTER2@ JMP SIMUL? 

* 

* PRINT RETURN ADDRESS 

* 

RTRN JSR TSTTRM| 
BNE RTRN4 
TST NESTC 
BEQ RTRN2 
LDX #RTADS 
JSR PSTRNG 
LOX SP 
INK 
LDA A 1. 
LDA B GX 
STA A YALUE+1 
STA B VALUE 
LDX #¥ALUE 
JSR OUTADR 

RTRN1L JMP EXEC 

RTRN2 LOX #NORTS 
JSR PSTRNG 
BRA RTRNI 

RTRN4 JMP SYNER 


* 
* DO DISASSEMBLY 
* 


CIS JSR TSTTRM 
BEQ RTRN4 
JSR GETRNG 
JSR PCRLF 
LDX FIRST 
STX OLDPC 

DISe JSR PCRLF 
JSR DISO 
LCR RA OGLDPC 
LDA B OLDPC+1 
CMP A LAST 
BHI DIS4 
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POINT TO STRING 
REPORT 


POINT TO STRING 
GO REPORT 


TEST TERM 
ERROR? 
CHECK NEST COUNT 


POINT TO STRING 


GET SP 
BACK INTO STACK 
GET ADDRESS 


SRVE ADDRESS 


POINT TO IT 
PRINT RODRESS 
RETURN 

POINT TO STRING 
PRINT IT 


REPORT ERROR 


CHECK TERM 
ERROR? 

GET ADDRESSES 
PRINT CR & LF 
GET START ADDR 
SAYE START 

PRINT CR & LF 

DO ONE LINE 

GET NEXT POINTER 


FINISHED? 


TSC DEBUG PACKAGE 


4EBO 
4EB2 
4EBS 
4EB7 
4EBA 
4EBD 
4EC8 


4ECD 
4EDO 
.4ED2 
4EDS 
4ED?7 
4EDA 
4EDC 


S$EDE 
4EEL 
4EES 
4EE6 
4EES 
4EEA 
4EED 
4EFQ 
4EF3 
4EF6 
4EF9 
4EFC 
SEFF 
4F 02 
4FO5 
4FO8 
4F OB 
4FOE 
4F141 
4F13 
4Fi5 


25 
Fi 


93 


94 


2A 


9D 


SD 
BS 


73 


BLO DISe 

CMP B LAST+1 

BLS DISe2 
DIS4 LDX PC 

STX OLDPC 

JSR PCRLF 
DIS6 BRA RTRN1A 


* 
* SET TRACE 
a 


STRAC JSR EQVAL 
LDR A VALUE+1 
STA A TRCF 
BRA DIS6 


+ 
* SET STOP ADDRESS © 
* 


SSTOP JSR TSTEQ 
BNE SSTOP2 
JSR GETHEX 
BCS SSTOPe 
STX END 
BRA DIS6 

SSTOP2 BRA RTRN4 


oe 
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RESET POINTERS 


RETURN TO EXEC 


MODE AND LEVEL 


GET VALUE 


SAVE IN FLAG 
RETURN 


TEST FOR EQUALS 
ERROR? 

GET ADDRESS 
ERROR? 

SAVE ADDRESS 
RETURN 

REPORT ERROR 


* EXAMINE AND CHANGE MEMORY 


*" 


xMEM © JSR TSTTRM 
BEQ xMEM2 
JSR GETHEX 
BCS SSTOP2 
BRA SMEMS 
xMEMe LDX PC 
xMEMZ STH POINT2 
JSR PCRLF 
XMEM35 LDX #POINT2 
JSR OUTRDR 
JSR OUTSP 
LDX POINTe 
JSR OUTHEX 
JSR OUTSP 
LDX POINTe 
CLR VALUE 
CLR ¥VALUE+1 
JSR GETCHR 
CMP A ##D 
BEQ DIS6 
CMP RAR #$A 


CHECK TERM 


GET ADDRESS 
ERROR? 


GET DEFAULT RDDR 
SAVE POINTER 
PRINT CR & LF 
POINT TO ADDRESS 
PRINT IT 

PRINT SPACE 
POINT TO DATA 
PRINT IT 

PRINT SPACE 

GET ADDRESS 
CLEAR OUT NUMBER 


GET CHARACTER 
IS IT CR? 


Is IT LF? 
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4F17 
4F19 
4F1iB 
4F1D 
4F20 
4F22 
4F25 
4F28 
4F2A 
4F2D 
4F30 
4F32 
4F33 
4F35 
4F37 
4F3A 
4F3B 
4F30 
4F3E 
4F 40 
4F43 
4F46 


4F49 
4F4B 
4F4D 
4F4F 
4F51 
4F53 
4F55 
4F59 
4F5B 
4F5D 
4F60 
4F62 
4F64 
4F67 
4F6A 
4F6C 
4F6F 
4F72 
4F74 
4F76 
4F79 
4F7B 
4F7E 
4F94 
4Fe4 
4F86 
4Fe9 


04 


AG 


61 
SE 


Cé 


a9 
61 


37 
61 


SE 


37 


SD 
SE 
91 
81 
63 


95 
CE 


BEQ 
XMEM3? CMP 
BEQ 
JSR 
Bcs 
JSR 
JSR 
BRA 
xMEM38 LDX 
LDA 
STA 
NOP 
CMP 
BEQ 
JMP 
XMEM4 INK 
BRA 
XMEMS DEX 
LGA 
JSR 
STX 
BRA 


* 


* SET REGISTERS 


* 


SET JSR 
BEQ 
SET2 BSR 
BCS 
CMP 
BNE 
JSR 
LDX 
LDA 
LDA 
STA 
BRA 
SET4 JSR 
LDX 
LDX 
LDA 
LDA 
STA 
STA 
CPX 
BNE 
STA 
STA 
SETS JSR 
BNE 
IMP 
SET6 JMP 


A 


OD 


usaona 


XMEMS 
#$20 
XMEMSS 
TSTHEX 
xMEM4 
WRKHX 
GETCHR 
XMEMS?7 
POINT2 
VALUE+1 
@. X 


8. % 
xMEM4 
ILIN 


XMEMS 


#$D 

PUTCHR 
POINT2 
XMEM35 


TSTTRM 
SETS 
FNDREG 
SET6 

#1 

SET4 
HEQ@VAL 
POINTe 
2. % 
VALUE+1 
QO, X 
SETS 
HEQVAL 
POINT2 
2.4% 
YALUE 
YVALUE+1 
Os % 

1, % 

#SP 
SETS 
MAXSP 
MAXSP +1 
TSTTRM 
SET2 
EXEC 
S'YNER 
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IS IT SPACE? 
Is IT HEX? 


WORK IN VALUE 
GET NEW CHARACTER 


GET ADDRESS 
GET VALUE 
PUT NEW OATA 
DELAY 

CHECK MEMORY 


REPORT ERROR 
BUMP TO NEXT 
REPEAT 

MOVE BACK ONE 
OUTPUT CR 


SAVE POSITION 


CHECK TERM 
ERROR? 

FIND REGISTER 
ERROR? 

CHECK SIZE 


GET HEX VALUE 
GET POINTER 
POINT TO REG 
GET VALUE 

SET REGISTER 


GET HEX VALUE 
GET POINTER 
POINT TO REG 
GET VALUE 

SET REGISTER 
Is IT SP? 

SET MAX DEPTH 
RNY MORE? 


RETURN 
REPORT ERROR 
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* 
* FIND REGISTER IN MEMORY 
ae 


4F8C BO 43 61 FNDREG JSR NXTCH GET NEXT CHAR 
4F8F 25 FS BCS SET6 ERROR? 

4F91 36 PSH A SAVE IT 

4F92 BD 43 61 JSR NXTCH GET NEXT 

4F95 32 PUL A 

4F96 24 FL BCC SET6 ERROR? 

4F98 84 SF FNDREL AND A #$5F MAKE UPPER 
4F9R CE 59 67 LDX #RGT POINT TO TABLE 
4F90 C6 O41 LOA B #4 SET COUNT 
4F9OF 6D 08 FNDRE@ TST 8. % END OF TAB? 
4FA1 27 12 BEQ FNDRE6 

4FAS AL 08 CMP A @.X COMPARE NAMES 
4FRS 27 87 BEQ FNDRE4 MATCH? 

4FA?7 08 INX MOVE TO NEXT 
4FAS 08 INK 

4FA9 88 INK 

4FAR 88 INX 

4FRB SC . INC B BUMP COUNT 
4FRC 20 F1 BRA FNDRE2 REPEAT 

4FAE AG O1 FNDRE4 LDA A 1,% GET SIZE 

4FBO FF 40 61 STX POINT2 SAVE POSITION 
4FB3 OC CLC SHOW FOUND 
4FB4 39 RTS RETURN 

4FBS @D FNDRE6 SEC SHOW ERROR 
4FB6 39 RTS ‘RETURN 


* 
* SET BREAK POINT 
td 


‘4FB7 7F 40 B1 BRK CLR BTYP CLEAR TYPE 
4FBA BD 4C 63 JSR TSTTRM CHECK TERM 
4FBD 27 27 BEQ BRK3 ERROR? 

4FBF 81 40 CMP RAR #°@ CHECK FOR “’@”’ 
4FC1 26 67 BNE BRK2 

4FC3 86 03 LDA RO #$3 SET DEFAULT TYPE 
4FCS B? 40 BL STA A BTYP 

4FC8 20 1F BRA BRK4 

4FCA BD 43 61 BRKe JSR NXTCH GET CHARACTER 
4FCD 81 48 CMP A #°@ Is IT ’@’? 
4FCF 27 18 BEQ BRK4 

4FD1 BD 51 6C JSR FNDOTP FIND TYPE 
4FD4 25 18 BcSs BRK3 ERROR? 

4FD6 AG B1 LDR A 1.% GET TYPE 

4FD8S BA 40 Bi ORA AR BTYP MASK IN NEW 
4FDB B? 48 B1 ' $TA RAR BTYP SAVE NEW 

4FDE 20 EA BRA BRK2 REPEAT 

4FEQ FE 4@ AC BRK2S LOX BPPOS GET BP POS 


4FE3 BD 51 4D JSR RMYBP REMOVE BP 


TSC DEBUG PACKAGE 


4FE6 
4FE9 
4FEC 
4FEE 
4FF4 
4FF4 
4FF? 
4FFA 
4FFD 
5008 
5002 
5895 
5008 
5008 
S@GE 
5041 
5013 
5015 
5016 
5017 
5019 
5@1C 
501F 
5022 
5024 
5026 
5029 
562B 
5@2E 
5830 
5033 
5035 
5037 
5039 
5038 
503E 
S5O3F 
5042 
5044 
5047 
5049 
5048 
S@4E 
5050 
5053 
5056 
5a5e 
5e58 
Se@5D 
505F 
5061 
5064 
5067 
5@69 


CE 
BS 


AC 


B3 


B1 
63 


61 


58 
58 


RAC 


EE 


RC 
SD 


SE 


AE 
AC 


BRK3 
BRK4 


BRK42 


BRK45 
BRKS 
BRKSS 


BRKS8 


BRK6 


BRK? 


JMP 
JSR 
pcs 
STX 
LDA 
LDA 
JSR 
STX 
CPX 
BNE 
LDX 
JSR 
LDX 
JSR 
JMP 
LDA 
CLR 
INK 
DEC 
BNE 
LDX 
LDA 
LDA 
STA 
STA 
LOR 
STA 
JSR 
BEQ 
JSR 
CMP 
BEQ 
CMP 
BEQ 
LDX 
DEX 
STA 
BRA 
LDX 
LDA 
STAR 
JSR 
BCS 
LDX 
LDA 
BMI 
LDA 
STA 
ORA 
STA 
LDX 
CPX 
BNE 
LDA 


DUVDVD 


DD 


DVDVAN wD 


SYNER 
GETHEX 
BRK3 
BPAD 
BPAD 
BPAD+1 
LKBP 
BPPOS 
#STRTPC 
BRKS 
#BOVYST 
PSTRNG 
BPPOS 
RMYBP 
EXEC 
#8 

@.% 


BRKSS 
BPPOS 
BPAD 
BPAD+1 
QO. X 
11% 
BTYP 
728 
TSTTRM 
BRK? 
NXTCH 
#°> 
BRK6 
#°<? 
BRKS8& 
BUFPNT 


BUFPNT 
BRK? 
BPPOS 
#380 
2% 
INDEC 
BRKe5 
BPPOS 
VALUE 
BRK25 
VALUE +1 
3, % 
2.% 
2.% 
BPEND 
BPPOS 
BRK7e2 
#8 
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REPORT ERROR 
GET ADDRESS 


SAVE ABDORESS 
GET ADDRESS 


LOOK FOR BREAKPOINT 
SAVE POSITION 
OVERFLOW? 


POINT TO STRING 
PRINT IT 

GET POS 

REMOVE IT 
RETURN 

SET COUNTER 
CLEAR OUT BP 
DEC THE COUNT 
POSITION 
RDDRESS 


GET 
GET 
PUT IN ADDRESS 
GET TYPE 


PUT IN 
CHECK TERM 


GET CHARACTER 
CHECK COUNTERS 


RESET POINTER 


GET POSITION 
SET BEFORE COUNT 


GET COUNT 
ERROR? 

GET POSITION 
GET YALUE 
COUNT TOO BIG? 


SAVE COUNT 


POINT TO BP 
CHECK IF NEW 
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2D 
RE 
Ba 


566B 
SO6E 
S@741 
5874 
5076 
5878 
SO7A 
507C 
SO7E 
5889 


BRK72 


FL 


* 


* SETUP 
“ 
5983 63 DOHB 
5086 
5988 
5088 


EO 
95 


DOHB1 
DOHB2 


* 
* SETUP 
ote 


SO8E DOMB 
S891 

5894 

S896 

Sa99 

SB9C 

SO9F | 
S@A2 
SGAR4 
S@A6 
S@AS 
SBAC 
SORE 
S8Ba 
S6Be 
SBB3 
SBB6 
S8Bs 
SOBB 
S@BD 
S@6F 
S8ce@ 
98C3 


DOMB1 


DOMBe 


AG 


be 
DOMB4 


B6é 


* 

* SETUP 
* 

DOJB 


BD BS 


25 


43 
BE 


Sacs 
58cs 


JSR 
STX 
LDA 
BIT 
BNE 
BIT 
BNE 
BIT 
BNE 
JMP 


> D DD 


ADDBX 
BPEND 
BTYP 
#$20 
DOHB 
#$40 
DOMB 
#$38O 
DOJB 
BEXP 


HISTOGRAM COUNT 


JSR 
BEQ 
JMP 
JIMP 


MESSAGE 


LDX 
CPX 
BNE 
JMP 
LDA 
LDA 
LDX 
STR 
STA 
LDX 
JSR 
CMP 
BEQ 
STA 
INK 
CPX 
BNE 
JMP 
LDA 
STA 
INK 
ST 
BRA 


JUMP BP 


JSR 
BCS 


oD OD 


2D 


TSTTRM 
DOHBe 
BRKe5 
EXEC 


NXTMSG 
#USER 
DOMB1 
BRK42 
NXTMSG 
NATMSG+1 
BPPOS 
Ss % 
6.% 
NXTMSG 
NXTCH 
#$0 
DOMB4 
OB. % 


#USER 
DOMB2 
BRK42 
#4 
Q. x 


NXTMSG 
DOHB2 


GETHEX 
DOHB1 
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CALCULATE END 
SAVE END 

GET TYPE 

Is IT HIST? 

IS IT MESSAGE? 
IS IT JUMP? 


PROCESS EXP 


CHECK TERM 


REPORT ERROR 
RETURN 


CHECK FULL 


GET POINTER 


POINT TO BP 
SAVE POINTER 


POINT TO SPACE 
GET NEXT CHAR 
Is IT CR? 

SAVE CHARACTER 


TABLE FULL? 


SETUP TERM 


FIX POINTER 
MARK END 
RETURN 


GET ADDRESS 
ERROR? 
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SSCA 
SecD 
S800 
Sed3 
S805 
Sab? 


5e09 
Secc 
S@DbE 
S@E1 
SBE3 
S8E5 
S@E6 
SGES 
SOEB 
S@ED 
S@EE 


SOF 1 
SGF4 
SGF6 
S@F9 
SOFB 
S@FD 
SOF F 
5162 
53164 
5106 
51868 
5S16B 
S10E 
5118 
Site 
5114 
S117 
5119 
S11C 
Si1e 
5120 
5i2e 
5125 
9127 
5128 
5129 
512A 


So 
SE 
AC 


AC 


68 


61 


E@ 


63 


61 


61 


7E 
61 


BS 


D9 


98 


LDA A VALUE 
LOA B VALUE+2 
LDX BPPOS 
STA A 5.% 

STR B 6: 

BRA DOHBe2 


* 
* SET CONDITIONAL STATUS 
* 


SETCN LDX BPPOS 
LDA B #4 
LOA A LSTTRM 
CMP A #7! 
BNE SETCNe 
INC B 
JSR NXTCH 

SETCN2 CMP A #%= 
BNE SETCN4 
RTS 

SETCN4 JMP BRKe5 


* PROCESS BP EXPRESSION 


* 


TSTTRM 


BEXP JSR 
BEQ DOHB2 
JSR NXTCH 
AND AR #$5F 
CMP A #°T 
BNE SETCN4 
JSR NATCH 
AND AR #$5F 
CMP A °F 
BNE SETCN4 
JSR SKPSPC 
JSR NATCH 
BCC BEXPe 
CMP A #°S 
BNE SETCN4 
JSR GETHEX 
Bcs SETCN4 
JSR SETCN 
ORA B #80 
STA B 4.% 
BRA BEXP4 

BEXP2 JSR FNDREL 

BEXP3 BcS SETCN4 
RSL B 
ASL & 
ASL B 
ASL B 
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GET ¥ALUE 


POINT TO BP 
SAVE ADDRESS 


RETURN 


POINT TO BP 


GET TERM 
NOT EQUALS? 


SET ING 

GET NEXT CHAR 
Is IT ‘=’? 
ERROR? 

RETURN 

REPORT ERROR 


CHECK TERM 


GET CHARACTER 
MAKE UPPER 

Is IT ‘I’ 
ERROR? 

GET NEXT 

MAKE UPPER 

Is IT °F’? 


SKIP SPACES 
GET CHARACTER 
LETTER? 

Is IT ’$’? 
ERROR? ; 
GET ADDRESS 


SET CONDITION 
SET ADDR TYPE 
SAYE IN BP 


FIND REGISTER 
ERROR? 
FIX SPEC 
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5126 
SL2E 
S131 


514D 
5158 
5152 
S155 
5157 
S159 
515B 
S2i5C 
SiS5E 
5161 
$163 
5166 
‘3168 
516B 


516C 
S16F 
S171 
S173 
S175 
S177 
5178 
S179 
517B 
5S17C 
517D 
S1L7E 


RE 


AE 


AF 


AF 


RE 


24 


BEXP4 


* 


* REMOVE BREAKPOINT FROM 


* 
RMVBP 


RMVYBP1L 


RMVBP2 


RMVBP4 
* 


* FIND 
* 


FNDTP 
FNDTP2 


FNDTP4 
FNDTP6 


* 


* PRINT 
* 


STA B 
JSR 
JSR 
ORA 
STA 
JSR 
BCS 
LDA 
LBA 
LOX 
STA 
STA 
BRA 


ODD OD 


OPCNT 
NXTCH 
SETCN 
OPCNT 
4.% 
GETHEX 
BEXP3 
VALUE 
VALUE+1 
BPPOS 
So 
6,% 
HIST? 


CPX BPEND 
BEQ RMVBP4 
CPX BPEND 
BEQ RMYBP2 
LDR A 8. 

STR A GK 

INK 

BRA RMVBP1 
LOA A BPEND+1i 
SUB A #8 

STA A BREND+1 
BCC RMYVBP4 
DEC BPEND 
RTS 
BP TYPE IN TABLE 
LOX #TYPTB 
TST 8. x 

BEQ FNDTP6 
CMP A 8% 

BEQ FNDTP4 
INK 

INX 

BRA FNDTP2 
cLCc 

RTS 

SEC 

RTS 

HISTOGRAMS 
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SAVE VRLUE 

GET CHARACTER 

GET CONDITIONAL 


SAVE IN BP 
GET VALUE 
ERROR? 

GET VALUE 


POINT TO BP 
SAVE VALUE 


RETURN 


TABLE 


END OF LIST? 
END OF TABLE? 


GET CHARACTER 
MOVE IT DOWN 
BUMP TO NEXT 
REPEAT 

GET END POINT 
DEC BY 8 

SAVE NEW 


ADJUST MSB 
RETURN 


POINT TO TABLE 
END OF TABLE? 


CHECK CHARACTER 
MATCH? 
MOVE TO NEXT 


SHOW MATCH 
RETURN 
SHOW ERROR 
RETURN 
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SL7F 8b 19 HIST BSR SETFL SET UP POINTERS 
5181 BD 351 CE HIST2 JSR NXTRB GET BP POS 
5184 26 GE BNE HIST6 FINISHED? 
S186 A6 07 LDA A 7+ GET TYPE 

5188 84 20 ANDO AR ##20 Is IT HIST? 
S18A @7 FS BEQ HISTe 

518c 8D ee BSR PBPAD PRINT ADDRESS 
S1i8E SF CLR B CLEAR FLAG 
Si8SF BD 42 DOS JSR OUTDEC OUTPUT COUNT 
5192 20 ED BRA HISTe REPEAT 

5194 BD 42 94 HIST6 JSR PCRLF | PRINT CR & LF 
S197 7E 414 95 HIST? JMP EXEC RETURN 


oe 
* SETUP FIRST & LAST POINTERS 
* 


S19A BD 42 94 SETFL JSR PCRLF PRINT CR & LF 
519D CE @@ 88 LDX #3 SET FIRST 
SLAG FF 480 63 STH FIRST 

S1A3 99 DEX SET LAST 
SiA¢ FF 4@ 65 STX LAST 

S1A7 BO 4C 63 JSR TSTTRM CHECK TERM 
SLAR 27 @3 BEQ SETFLe 

SLAC BD 4C DD JSR GETRNG GET RANGE 
SLAF CE 3B F8 SETFL2 LDX #BPTAB-3 

51B2 FF 46 B4 STX NXTBP SET POINTER 
S1B5 39 RTS RETURN 


* 
* PRINT BP ADDRESS 
* 


S1B&é BD 42 94 PBPAD JSR PCRLF PRINT CR & LF 
S1B9 BD 49 4F JSR OUTSP PRINT SPACE 
S1BC BD 43 26 JSR OUTADR PRINT ADDRESS 
SiBF CE SA E4 LDS #DSHST POINT TO STRING 
51Ce BR 42 87 JSR PDATAL PRINT IT 

51C5 FE 40 B4 LDX NXTBP POINT TO BP 
Sics 68 INS BUMP TO INFO 
S1ic9 08 INS 

SiCA 88 INK 

SicB 68 INS 

S1icc 68 INK 

S1iCD 39 RTS RETURN 


* 
* RETURN NEXT BP IN RANGE 
* 


SIiCE FE 48 B4 NXTRB LOX NXTBP POINT TO BP 
51D1 Cé 88 LDA B #8 ADD IN 8 
5iD3 BD 44 2D JSR ADDBX 


5106 FF 40 B4 NKTRB2 STH Nx“ TBP SAVE NEW POS 
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SiDb9 
51i0C 
S1iDE 
S1EO 


S1EE 
SiF 1 
S1iF3 
SiF5 
S1F8 
S1iFA 
SLFC 
S1FD 


S1iFE 
5208 
S282 
5204 


S295 
S208 
S2e0A 
Sseec 
Seer 
sei2 
5214 
S216 
Se19 
Se1A 
Sseic 
Se1e 
See1 
Seee2 
S223 
S226 


ns) 


O14 


B4 


63 


65 


9A 


BS 


24 


67 


a9 


67 


CPX BPEND 
BEQ NXTRB4 
LOR A O.X 
LDA B 1.% 
BSR INRNG 
BNE NXTRB 
LDX NX TBP 
CLR A 
RTS 

NXTRB4 LDR A #1 
RTS 


* 
* ADDRESS IN RANGE CHECK 
* 


#FIRST 


INRNG  LDX 
BSR DCMP 
BLO NXTRB4 
LDX #LAST 
BSR DCMP 
BHI NXTRB4 
CLR A 
RTS 

oc 

* DO 16 BIT COMPARE 

* 

DCMP CMP A @.X 
BNE DCMP2 
CMP B 41, 

DCMP2 = RTS 

* 

%* PRINT BREAK POINTS 

ee 

PBP JSR SETFL 

PBP2 BSR NXTRB 
BNE PBP6 
JSR PBPAD 
LDA B 2X 
LDX  #TYPTB 
LOA A #8 
STA A CNTR 

PBP3 ROR B 
BCC PBP4 
LDA A @,X 
JSR PUTCHR 

PBP4 INX 
INX 
DEC CNTR 
BNE PBP3 


TSC ASSEMBLER PAGE 47 


END OF LIST? 
GET ADDRESS 


CHECK RANGE 
REPEAT 
POINT TO BP 
SHOW MATCH 
RETURN 
SHOW ERROR 
RETURN 


POINT TO 1ST 
COMPARE IT 


POINT TO LAST 
COMPARE 


SHOW MATCH 
RETURN 


CHECK MSB 


COMPARE LSB 
RETURN 


SET RANGES 

GET BREAKPOINT 
FINISHED? 
PRINT ADDRESS 
GET TYPE 

POINT TO TABLE 
SET COUNTER 


CHECK BIT BY BIT 
GET CHARACTER 
PRINT IT 

MOVE TO NEXT ENTRY 


DEC THE COUNT 
REPEAT 
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5228 
Seen 


Seep 
5230 
S232 
S234 
S237 
S2e3A 
Se3c 
S23F 
S241 
5244 
S246 


S249 
S24c 
Se4r 
Se51 
S253 
S255 


S257 
ses9 
Sesc 


NeS5E 
9261 
9264 
Se6?7 
S26A 
S2eé6c 
S26F 
S271 
5274 
Ser? 


S2e7Ar 


28 DE 
7E $1 


CE 59 


94 


9A 


4D 


BS 


BS 


B4 


95 


9A 
CE 


oF 


PBP2 
HIST6 


BRA 
PBP6 JMP 
* 
* CLEAR BREAKPOINTS 
* 


CLB JSR SETFL 

CLBe BSR NXTRB 
BNE CLB4 
JSR RMVBP 
LOR A NXTBP+1 
SUB A #8 
STA A NKXTBP+L 
BCC CLBe2 
DEC NX TBP 
BRA CLBe 

CLB4 JMP EXEC 


* 
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RETURN 


SET RANGE 

GET BP ADDRESS 
FINISHED? 
REMOVE BP 

GET POINTER 
DEC BY 8 

SAVE RESULT 


ADJUST MSB 
REPEAT 
RETURN 


* CLEAR HISTOGRAM COUNTERS 


* 


JSR 


CLH SETFL 

CLHe JSR NXTRB 
BNE CLB4 
CLR 5. & 
CLR 6. % 
BRA CLH2 


a 
* DO COUNTED SIMULATION 
* 


TCSIM LDA AR #$FF 
STA A PRON 
BRA csime 

CSIM CLR PRON 

CSIM2 LDx #1 
STx SIMCNT 
JSR TSTTRM 
BE CSIM4 
JSR INDEC 
BCS CSIM6 
STX SIMCNT 

CSIM4 JMP SIMUL2 

CSIM6 JMP SYNER 

* 

* PRINT STATES COUNTER 

* 

PSTAT LDX #STST 


SET RANGE 
GET BREAKPOINT 
FINISHED? 
CLEAR COUNTER 


REPEAT 


SET TRACE ON 


TURN TRACE OFF 
SET GCEFRULT COUNT 


TEST TERM 


GET COUNT 
ERROR? 

SET COUNT 

GO SIMULATE 
REPORT ERROR 


POINT TO STRING 


TSC DEBUG PACKAGE 


S27D 
5280 
5283 
S286 
S287 
S2sA 


S2sc 
SesF 
Se9e2 
segs 


S297 
523A 
S29C 
S29E 
Sent 
S2@A3 
S2@Ané6 


Sens 
S@AnB 
S2@Ae 
S2B1 


S2B3 
SeB6é 
S2B9 
Seac 


SeBE 
seci 
Sec4 
Sec7 
Seca 
Seco 
Secr 
S2d1 


85 
A? 
26 


26 


2A 


8B 


69 


At 


AL 


2A 


7F 


2A 


7B 


ISR PSTRNG 
LDX #STATES 
JSR OUTADR 
INX 
JSR OUTADR 

PSTAT4 BRA CLB4 

* 

* SET DELAY 

bd 

SDELY JSR EQVAL 
LDA A VALUE+4 
STA A DELAY 
BRA PSTAT4 


* 
* SET INDIRECTION MODE 
SS 


SIND JSR TSTON 
BNE SIND2 
LDA A #SFF 
STA A VFLG 
BRA PSTAT4 

SIND2 CLR VFLG 
BRA PSTAT4 

* 

* SET INTERUPT STATUS 

* 

SIRQ JSR EQVAL 
STX TRAC 
STK TRACe 
BRA PSTART4 

SNMI JSR EQVAL 
STX NMIC 
STX NMICe2 
BRA PSTAT4 


* 
* HEX CALCULATOR 
* 


CRLC CLR BTYP 
LDX #CLCP 
JSR PSTRNG 
JSR INBUF 
JSR PRYVW 
CMP A #$D 
BEQ CALC? 
BSR CNUM 


TSC ASSEMBLER PAGE 49 
PRINT IT 

POINT TO COUNTER 

PRINT IT 


RETURN 


CHECK VALUE 
GET VALUE 
SET DELAY 


TEST ON/OFF 
SET TO ON 


RETURN 
CLEAR MODE 


GET VALUE 
SET COUNTERS 


GET VALUE 
SET COUNTERS 


CLEAR MODE 
POINT TO PROMPT 
PRINT IT 

GET INPUT LINE . 
CHECK FOR CR 


GET FIRST NUMBER 


TSC DEBUG PACKAGE 


Sebd3 
Sebd6 
Sebo 
S2DB 
Sepo 
SeDF 


S324 
53327 
5329 
5328 
S32eE 
S331 
9333 
9335 
5338 
S339 


S338 
S33E 


BD 
25 


43 
F9 


94 


61 
BS 


EE 


EE 


STH FIRST 
JSR TSTTRM 
BEQ CALCS 
CMP RO #*+ 
BEQ CALCS 
CMP AR #°- 
BNE CNUME 
STA A BTYP 
CALCS BSR CNUM 
STR LAST 
LDA A FIRST 
LDA B FIRST+1 
TST BTYP 
BNE CALCE6 
ADD B LAST+1 
ADC A LAST 
BRA CALC? 
CALCEé SUB B LAST+1 
SBC A LAST 
CALC? STA A FIRST 
STA B FIRST+1 
CALCS JSR PCRLF 
LOA AR #°S 
JSR PUTCHR 
LOX #FIRST 
JSR OUTADR 
JSR OUTeSP 
DES 
CLR B 
JSR OUTDEC 
BRA CALC 
CALCS BRA DOASM4 


c 
* GET NUMBER FOR CALC 
* 


CNUM JSR PRYH 
CHP RO #°S 
BNE CNUM2 
JSR NXTCH 
JSR GETHEX 
BcS CNUME 
BRA CNUM4 

CNUM2 JSR INDEC 

CNUM4 RTS 

CNUM6E BRA DOARSME 

+ 

* PRINT STACK CONTENTS 

* 

PSTK JSR INCDEC 
Bcs CNUME 
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SAVE IT 
END OF LINE? 


Is IT AGB? 
IS IT SUBTRACT? 


SET MODE 
GET SECOND 
SAVE IT 
GET NUMBER 


ADD? 


ADD NUMBERS 


SUBTRACT NUMBERS 
SAVE RESULT 


PRINT CR & LF 
OUTPUT “$” 


POINT TO NUMBER 
PRINT HEX 

PRINT SPRCES 
RDJUST POINTER 
SET FLAG 

PRINT DECIMAL 
REPEAT 

RETURN 


CHECK CHRRACTER 
Is IT ’*$’? 


EAT CHARACTER 
INPUT HEX 
ERROR? 


GET DECIMAL 
RETURN 
REPORT ERROR 


GET COUNT 
ERROR? 


TSC DEBUG PACKAGE 


5340 
5343 
5345 
5347 
S34A 
5346 
534C 
S34E 
9351 
5353 
5356 
5359 
535C 
S35D 


S35F 
5362 
5364 
5367 
536A 
S36D 
5376 
5373 
59376 
9379 
S37C 
S37E 
5388 
5382 
5384 
S387 


538A 
538C 
S38F 
5332 
5395 
5398 
539A 
S39C 
S39F 
SSAL 
S3A3 
S3A6 
S3A8 
S3AAR 


91 
94 


29 


95 
CE 


61 


94 


LOR A VALUE+1 
BNE PSTK8 
LDA A #6 
PSTK@ LDBX SP 
' PSTK1 INK 
DEC A 
BNE PSTK1 
PSTKe CPX SP 
BEQ CALCS 
JSR PCRLF 
JSR OUTSP 
JSR OUTHEX 
DEX 
BRA PSTKe 


* 
* DO LINE ASSEMBLY 


DOASM JSR GETHEX 
BCS DOASM6 
STX POINT 

DOASM2 JSR PCRLF 
JSR OUTSP 
LDX #POINT 
JSR OUTADR 
JSR OUTSP 
JSR INBUF 
JSR SKPSPC 
CMP A #$D 
BEQ DORSM4 
BSR ASML 
BRA DOASMe 

DOASM4 JMP EXEC 

DOASM6 JMP SYNER 

* 

* DO ASSEMBLY 

* 

RSML LDA A #50 
STA A BTYP 
CLR MOD 
LDX #OPND 
JSR NXTCH 
AND A #$5F 
STR A @.* 
JSR NXTCH 
AND AR #$5F 
STA A 1,% 
JSR NXTCH 
AND A #$5F 
STA R 2.% 
JSR 


PRVW 
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GET NUMBER 


SET DEFRULT 

GET S POINTER 
BUMP POINTER 
DEC THE COUNT 


FINISHED? 


PRINT CR & LF 
PRINT SPACE 
PRINT CONTENTS 
DEC POINTER 
REPEAT 


GET ADDRESS 
ERROR? 

SAVE POINTER 
PRINT CR & LF 
PRINT SPACE 
POINT TO ADDRESS 
PRINT IT 
PRINT SPACE 
GET LINE 

SKIP SPACES 
Is IT NULL? 


RSMBL LINE 
REPEAT 
RETURN 
REPORT ERROR 


SET DEFAULT INHER 


CLEAR MODE 

POINT TO STORAGE 
GET MNEMONIC 
MAKE UPPER 

SAVE IN MEMORY 


MAKE UPPER 


CHECK CHARACTER 
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S3AD 81 OD 
S3AF 27 S56 
S3B1i BD 43 42 
53B4 25 18 
S3B6 84 SF 
S3B8 81 41 
S3BA 26 65 
S3BC 7C 48 6F 
S3BF 26 BA 
53C1 81 42 
5S3C3 26 69 
S3C5 7C 48 6F 
53C8 7C 406 6F 
S3CB BD 43 61 
S3CE BD 43 7E 
53D1 81 OD 
5303 27 3e 
S3D5 BD 43 94 
S308 81 23 
S3DR 27 19 
S3DC BD 53 24 
S30F B6 4@ 63 
SZE2 84 ec 
S3E4 26 6B 
S3E6 BO 43 61 
S3E9 81 58 
S3EB 26 9A 
S3ED 86 38 
S3EF 20 13 
S3FL 86 40 
S3F3 20 OF 
S3FS BD 42 61 
S3FS8 BO 43 94 
S3FB 81 27 
S3FD 27 29 
S3FF BD 53 24 
5402 86 14 
5404 Br 46 BL 
9407 BD 54 36 
346A FE 48 SF 
540D 
S4Q@F Ci 18 
5411 27 18 
5413 Ci 30 
9415 26 06 
S417 98 

2418 B6é 48 SD 
541B A? 20 
541D @8 | 

S41E B6 40 SE 
5421 AY Ba 
5423 98 ASML??? 
53424 FF 40 SF 

S4e7r 39 


RASMLS 


ASML3S 
ASML4 


ASMLS 


ASMLE 


RASML6S 
ASML65 
ASML? 


RASML75 


CMP 
BEQ 
JSR 
BCS 
AND 
CMP 
BNE 
INC 
BRA 
CMP 
BNE 
INC 
INC 
JSR 
JSR 
CMP 
BEG 
JSR 
CMP 
BEQ 
JSR 
LDA 
CMP 
BNE 
JSR 
CMP 
BNE 
LDA 
BRA 
LDA 
BRA 
JSR 
JSR 
CMP 
BEQ 
JSR 
LDA 
STA 
JSR 
LDX 
STA 
CMP 
BEG 


CMP: 


BNE 
INX 
LDA 
STA 
INX 
LOA 
STA 
INX 
STH 
RTS 


DD 


DD 


#$D 
ASML? 
CLASS 
ASML4 
#$5F 
#°A 
ASML3 
Moo 
ASML3S 
#°B 
ASML4 
MOD 
MOD 
NXTCH 
SKPSPC 
#$D 
ASML? 
PRYVW 
#” # 
ASMLE 
CNUM 
LSTTRM 
#”, 
RSMLS 
NSTCH 
#°X 
DOASM6 
#$20 
ASML65 
#$40 
ASML6E5 
NXTCH 
PRYW 
HY? 
ASMLS 
CNUM 
#410 
BTYP 
FNDIMN 
POINT 
8, % 
#10 
ASML? 7 
#530 
RSML75 


VALUE 
Q,% 


VALUE +2 
@,% 


POINT 


TSC ASSEMBLER PAGE S2 
Is IT CR? 
CLASSIFY CHAR 


MAKE UPPER CASE 
Is IT “A’? 


SET MOD 


Is IT “B’? 


SET MOD 

GET CHARACTER 
SKIP SPACES 
END OF LINE? 


CHECK CHARACTER 
Is IT “#°? 


GET NUMBER 
CHECK TERM 

Is IT COMMA 

IF SO. INDEXED 
GET CHARACTER 
Is IT x? 
ERROR? 

SET TYPE 


SET EXTENDED 


EAT “#/ 
CHECK NEXT 
Is IT "*"? 


GET NUMBER 
SET IMMEDIATE 
SAVE TYPE 
FIND CODE 

GET POINTER 
STUFF OPCODE 


BUMP POINTER 
GET NUMBER 


BUMP POINTER 
GET LSB 


BUMP ONE MORE 
SAVE POS 
RETURN 
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5428 BD 43 61 ASMLS JSR NXTCH EAT "-" 

342B BD 43 61 JSR NXTCH GET ASCII CHAR 
S42—& 7F 48 SD CLR VALUE 

5431 B? 4@ SE STA A VALUE+L SAVE VALUE 
5434 20 CC BRA ASML63 


oe 
* FIND MNEMONIC 
‘s 


5436 CE 5B 90 FNDMN LDX #OPTAB SET POINTER 


5439 7F 40 67 CLR CNTR 

S43C FF 46 C2 FNOMN1 STX OPPNT SAVE POS 

543F B86 40 78 LDA A OPND GET CHARACTERS 
5442 Fé 48 71 LDA B OPND+1 

5445 Al 60 CMP A Ok COMPARE TO TABLE 
5447 26 OD BNE . FNDMN2 

5449 Ei 61 CMP B 1. 

544B 26 09 BNE FNDMN2 

544D 36 PSH A SAVE CHAR 

S44E B6 40 72 LDR A OPND+2 GET 3RD CHAR 
5451 AL 82 CMP A 2X COMPARE 

S453 32 PUL. A RESTORE 

5454 27 @C . BEQ FNDMN4 

5456 08 FNOMN2 INK MOVE TO NEXT ENTRY 
S457 08 INX 

5458 98 INX 

5459 08 INX 

545A 7C 408 67 INC CNTR 

S45D 26 DD BNE FNOMN1 FINISHED? 

S45F 7E 41 CE JMP SYNER REPORT ERROR 
5462 F6 408 67 FNDMN4 LDA B CNTR GET OPCODE 
5465 CE SF 96 LDX #OPTARB+1024 

5468 BD 44 ed JSR RDDBX ADD TO POINTER 
5468 FF 40 C4 ST OPPNT2 SAVE POS 

S46E E6 60 LOA B Bx GET CODE 

5470 C4 OF AND B $F MASK BITS 

S472 27 BE BEQ - FNDM45 

5474 Ci @2 CMP B #2 MODIFIER? 

5476 22 BA BHI FNDM45 

5478 Fi 40 6F CMP B MOD CHECK MODIFIER 
547B 27 8A BEQ FNOMNS 

547D FE 408 C2 FNDM42 LDX OPPNT SET POINTER 
5480 20 D4 BRA FNOMN2 REPEAT 

5482 7D 40 6F FNDM45 = TST MOD CHECK MODIFIER 
5485 26 F6 BNE FNDM42 

5487 Ci 67 FNOMNS CMP B #7? CHECK TYPE 
5489 24 11 BHS FNOMNG 

548B Ci 63 CMP B #3 

548d 27 18 BEQ FNDOMN? RELATIVE TYPE? 
S48F Ci @4 CMP B #4 

5491 27 14 BEQ FNDOMN?7 

5493 E6 08 LDA B &@.Xx GET CODE Sh 
5495 C4 78 AND B #$79 GET ADDRESS TYPE 
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5497 
S43A 
S49C 
S49F 
S4AL 
S4A3 
S4A6 
S4A7 
S4AA 
S4RB 
S4AC 
S4RF 
54B2 
S4B5 
54B8 
S4BB 
S4BE 
S4C1 


54C3 
S4C6 
54C8 
S4CA 
54CD 
S4CF 
5402 


S405 
S408 
S4DA 
94DD 
S4E0 
S4E3 
S4E5 
S4E7? 
S4E9 
S4EB 
S4ED 
S4EF 
S4F21 
S4F3 
S4F5 
S4F8 
S4FB 
S4FE 
5569 


B1 


ce 


67 


SF 


693 


AB 


AB 
95 


63 


rae 


61 


CE 
Be 
C6 


26 


FNDMNG 


FNOMN? 


ITRAP2 
ITRAP4 


* 
* CLEAR 


* 


CLP 


CLPL 
CLPe 


CLP4 


CLPS 


CMP 
BNE 
LDX 
LDA 
AND 
LDA 
RTS 
LOX 
INK 
INN 
STR 
LDA 
LDA 
SUB 
SBC 
STA 
STA 
BRA 


TRAP 


JSR 
BNE 
LDA 
STA 
BRA 
CLR 
JMP 


PROTECTION TABLES 


JSR 
BNE 
JSR 
JMP 
JSR 
AND 
CMP 
BEQ 
CMP 
BEG 
CMP 
BEQ 
CMP 
BEQ 
JMP 
LDx 
STX 
BRA 
LO 


DOO 


UpDDAOD 


A 
A 


AR 


A 


BTYP 
FNDM4e2 
OPPNT 
31% 
#$30 
CNTR 


POINT 


POINT2 
VALUE 
VALUE+1 
POINT2+1 
POINT2 
VALUE 
VALUE+1 
FNDMN6 


TSTON 
ITRAP2 
#$FF 
ITRF 
ITRAP4 
ITRF 
EXEC 


TSTTRM 
CLPe 
CLRPR 
EXEC 
NSTCH 
#$5F 
#°S 
CLP4 
#°R 
CLPS 
#°W 
CLP6 
#°M 
CLP? 
SYNER 
#SMTAB 
SMEND 
CLPS 
#EXTAB 
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COMPARE 

GET POINTER 
GET COUNTS 

GET BYTE COUNT 
GET OPCODE 
RETURN 

GET ADDRESS 
BUMP BY 2 


SAVE NEW ADDR 
GET REL ADDRESS 


SUBTRACT VALUES 
SAVE RESULT 


FINISH UP 


CHECK ONCOFF 


SET ON 


TURN OFF 
RETURN 


CHECK TERM 

CLEAR ALL TABLES 
RETURN 

GET CHRRACTER 
MAKE UPPER CASE 
Is IT $? 

Is IT x? 

Is IT W? 

Is IT mM? 

REPORT ERROR 
POINT TO SIM TAB 
SET END 


POINT TO EX TAB 


TSC DEBUG PACKAGE 


5503 
5506 
5588 
5588 
SSOE 
5516 
S513 
5516 
S519 
5518 
551d 


SSiF 
5522 
S524 
5S27 
552A 
Ss5ec 


SS2F 


S531 
5534 
5537 
553A 
5530 
5548 
S541 
5544 
S547 
5548 
5549 
SS4A 
SS4C 
SS4F 
SooL 
9553 
S555 
5557 
S559 
S55B 
SSSE 
SSSF 
5568 
S362 
S565 
5568 
SS6A 
556D 
5376 
S372 
5574 


cs 


40 
CA 


68 


cc 
61 


BS 


94 
5D 


67 


SF 


a9 


94 
67 


SD 
06 


STX 
BRA 
CLP6 LDX 
STX 
BRA 
CLP? LDX 
STX 
CLP8 JSR 
CMP A 
BEQ 
BRA 


* 
* DUMP MEMORY 
* 


DUMP JSR 
BCS 
DUMP 1 JSR 
LDX 
LDA 
STA 
DUMP2 LDA 


oD D 


DUMP2S PSH B 


0 
Cc 
cr 

ow 


DUMPe? LDA 


ps) 
= 
9 
DD DIDA 


DUMP28 JSR 


DUMPS JSR 


EXEND 
CLP8 
#WPTAB 
WPEND 
CLPS8 
#MTAB 
MEND 
NXTCH 
#$D 
CLPL 
CLP2 


IN HEX AND 


GETHEX 
DUMP6 
PCRLF 
¥VALUE 
#16 
CNTR 
#16 
POINT 
#POINT 
OUTADR 
OUTSP 
POINT 


OUTHEX 
OUTSP 


DUMPeS 
POINT 
#16 
Q. x 
#S7F 
#S1F 
DUMP2s 
#7. 
PUTCHR 


DUMP2? 
PCRLF 
CNTR 
DUMPe 
‘VALUE 
GETCHR 
#$D 
DUMP6 
#$SF 
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SET END 


POINT TO WP TAB 
SET END 


POINT TO MEM TRB 


GET CHARACTER 
Is IT TERM? 


REPEAT 


ASCII 


GET ADDRESS 


PRINT CR & LF 
GET ADDRESS 
SET COUNT 


SET COUNTER 
SAVE POSITION 


PRINT ADDRESS 
PRINT SPACE 
RESET POINTER 
SAYE COUNT 


PRINT DATA & SPACE 
BUMP TO NEXT 

RESET COUNT 

DEC THE COUNT 


RESET POINTER 
RESET COUNT 
GET CHRRACTER 
MASK PRRITY 
CONTROL? 


SET UP ’_’ 
OUTPUT CHARACTER 
BUMP TO NEXT 

DEC THE COUNT 


PRINT CR & LF 
DEC THE COUNT 


BUMP ADDRESS 
GET RESPONSE 
IS IT RETURN? 


MAKE UPPER CRSE 
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5576 
5578 
SS7A 
S57C 
SS7E 
S581 
5584 
S586 


5589 
SS8c 
SS8SF 
5592 
5595 
5598 
5598 
SS9E 
SSAL 


SSR3 
SSAG 
SSA 
SSAC 
SSAF 
95Be 
SSB5 
SSB? 
S5B9 
SSBC 
SSBF 
55C1 
S5C3 
s5c5 
SSC6 
5S5C8 
SSCB 
SSCE 
SSCF 
SSD1 
3504 
S506 
SSD? 
SSDA 
SSOc 
SSDF 
SSEe 


SD 
SD 


95 


BS 
56 


SE 


S56 


56 


SF 


CMP A #°F 
BEQ DUMP1 
CMP A 8B 
BNE DUMPS 
DEC VALUE 
DEC VALUE 
BRA DUMP4 
DUMP6 JMP EXEC 


* 
* DO DOS COMMAND 
oe 


DODOS LDX DOSBUF 
STX POINT2 
LDX BUFPNT 
STX DOSBUF 
JSR DOCMND 
LDx POINT2 
STX DOSBUF 
JSR FMSCLS 
BRA DUMP6 
* 
* FINO STRING IN MEMORY 
* 
FIND JSR GETRNG 
LDX FIRST 
STX POINT2 
LDX #LINBUF 
STX DATPNT 
JSR PRV 
CMP Roa" 
BNE FINDS 
JSR NXTCH 
FIND2 JSR NXTCH 
CMP A #$D 
BEQ FIND4 
STA A GX 
INX 
BRA FIND2 
FINDS JSR GETHEX 
LDX DATPNT 
TST B 
BE FIND4 
LDA A VALUE+4 
STA A @.X 
INX | 
STX DATPNT 
BRA FIND3 
FIND4 STX DATPNT 
FINDS  LDX #LINBUF 
FIND6 STX POINT 
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Is IT °F’? 
Is IT °B’? 


DEC THE ADDRESS 


RETURN TO EXEC 


SAVE DOS POINTER 


SET DOS POINTER 
GO DO COMMAND 
RESET POINTER 


CLOSE ALL 


GET RANGE 
SET START POS 


POINT TO BUFFER 


CHECK NEXT CHAR 
Ts IT eee 


USE THE CHAR 
GET CHARACTER 
IS TI CR? 


SAVE CHARACTER 
BUMP POINTER 


GET HEX VALUE 
ANY HEX? 


GET VALUE 
SAVE CHAR 


SAYE POSITION 
REPEAT 

MARK END 

POINT TO BUFFER 
SAYE POSITION 
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SSES 
SSE? 
SSEA 
SSED 


5620 
3623 
S626 
5629 
56e2C 
562E 
5631 
5633 
5634 


3636 
5639 
563B 
S63E 
5649 
9642 
5645 
5647 
5649 
S64C 
S64E 


ba 
48 
40 
2E 
vl) 
1E 


42 
42 


63 
65 


61 


63 
61 


95 


63 


69 


BS 


6C 


FILL2 


LDA A 
LDX 
CPX 
BEQ 
CMP A 
BNE 
INX 
STX 
LDX 
INX 
CPX 
BNE 
LDX 
JSR 
JSR 
LDX 
STX 
BRA 
LDX 
INX 
STX 
STR 
BRA 
JMP 


FIND? 


FINDS 


a 
* FILL MEMORY 
* 


JSR 
JSR 
LDR A 
LDX 
STA A 
CPX 
BEQ 
INK 
BRA 


FILL 


* 


B.% 
FIRST 
LAST 
FINDS 
@,.X 
FIND? 


FIRST 
POINT 


DATPNT 
FIND6 
#POINT2 
PCRLF 
OUTADR 
FIRST 
POINT2 
FINDS 
POINT2 


FIRST 
POINT2 
FINDS 
EXEC 


GETRNG 
GETHEX 
VALUE+1 
FIRST 
O.% 
LAST 
FINDS 


FILL2 


TSC ASSEMBLER PAGE 57 
GET CHARACTER 

FINISHED? 

COMPARE CHARACTERS 

BUMP TO NEXT 

BUMP TO NEXT HERE TOO 

END? 

FOUND IT! 


PRINT CR & LF 
PRINT ADDRESS 


REPEAT 
RESET POINTER 


REPEAT 
GO TO EXEC 


GET RANGE 
GET FILL CHAR 


POINT TO STRRT 
STORE CHAR 
FINISHEO? 


BUMP TO NEXT 
REPEAT 


* SET REAL TIME BREAKPOINT 


* 


JSR 
BNE 
TST 
BEQ 
BRA 
JSR 
BCS 
LDA A 
STA A 
LDA A 
LDA B 


RT 


RT2 


TSTTRM 
RT2 
RTBF 
RTB4 
RTB2 
GETHEX 
RTB6 
0. % 
RTDAT 
1, % 
2.% 


CHECK TERM 


IS ONE SET? 


GET ADDRESS 


GET BYTES 
SAVE IN TEMPS 


TSC DEBUG PACKAGE 


S687 
S688 
S689 
S68c 
368D 
5698 
5693 
S696 
9699 
S69C 
969F 
~6R2 
S6AS 
S6AE 
S6AB 
S6RARE 
S6éBO 
36B3 
S6B5 
5S6B8 
S6BA 
S6BD 
56C9 


6D 


6E 


STA A RTDAT+4L 

STA B RTDAT+2 

LDA A #$7E 

STA A OX 

NOP 

CMP A OX 

BNE RT4 

STA A OP 

LDX #RTB 

STX POINT2 

LDX VALUE 

LDA AR POINT2 

STA A 4. 

LDA A POINTe+1 

STR A 2X 

INC RTBF 

STX RTAD 

LDX PC 

STX OP+1 

JMP TRCOLS 
RT4 IMP ILIN 


* 
* PROCESS REAL 
* 


RTB PSH A 
TPA 
‘STA A CC 
PUL A 
STA RAR AR 
STA B BR 
STH aR 
STS SP 
LDS SSP 
LDx RTAD 
STH PC 
STA OLDPC 
JSR PRREG2 
RTB2 LDA RTAC 
LDR A RTDAT 
STA AR @.X 
LDA A RTDAT+1 
STA RAR 4,.% 
LOR RA RTOAT+2 
STA A 2,.% 
CLR RTBF 
RTB4 JMP EXEC 
RTBS JMP SYNER 


* 
* CHECK SP PROTECTION 
a 
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SET UP “JUMP” 
DELAY 
CHECK MEMORY 


SET OP TOO 
SET POINTER 


RESET X 
SET ADDRESS 


SET FLAG 
SAYE ADDRESS 
GET PC 

SET IN OP 

GO EXECUTE 
REPORT ERROR 


TIME BREAKPOINT 


SAYE A 
GET STATUS 


RESTORE A 
SAVE ALL REGISTERS 


RESET STACK POINTER 
GET ADDRESS 
SAYE AS NEW PC 


PRINT REGISTERS 
GET ADORESS 
RESET INSTRUCTIONS 


CLEAR FLAG 
RETURN TO EXEC 
REPORT ERROR 


TSC DEBUG PACKAGE 


7D 48 9B CHKSP 
27? 34 


S6C3 
S56C6 
56C8 
S6C9 
S6cCA 
Sé6cc 
S6CD 
56D8 
S6D3 
S6D6 
S609 
S6DC 
S6DE 
S6E9 
S6E3 
S6ES 
S6E8 
S6EB 
S6EE 
S6FO 
S6F3 
S6F6 
S6F9 
S6FC 


CHKSP1 


CHKSP2 


CHKSP3 


CHKSP4 


* 
* PRINT 
* 
S6FD 94 DEPTH 
5708 
57083 
5706 


26 


* 


TST 
BEQ 
CLR 
TST 
BPL 
com 
ADD 
ADC 
STA 
STA 
CMP 
BHI 
BLO 
CMP B 
BHS 
STA A 
STR B 
JSR 
BNE 
LDX 
STX 
LDX 
JMP 
RTS 


DDUDVDOD OD 


MODE 
CHKSP4 


CHKSP1 


SP+1 

SP 
TSP+1 
TSP 
MAXSP 
CHKSP3 
CHKSPe2 
MAXSP +1 
CHKSP3 
MAXSP 
MAXSP +1 
MPR 
CHKSP4 
OLDPC 
PC 
#MSPST 
PRCH3 


STACK DEPTH 


JSR 
LDX 
JSR 
BRA 


PCRLFE 
#MAXSP 
OUTADR 
FLAGS 


* SET FLAG LOCATION 


- 
5788 FLAG 
57QB 
S7@GE 
5718 
S713 
5716 


S719 FLAGS 


* 
* PRINT 
* 
49 SINDEC 
40 


S7ic 
S7?1F 
S722 
5723 


SE 
SD 


4a 5D 


CLR 
JSR 
BEQ 
JSR 
STX 
INC 
JMP 


SINGLE 


STA A 
CLR 
CLR B 
LDX 


FLAGB 
TSTTRM 
FLAGS 
HE@YAL 
FLAGA 
FLAGB 
EXEC 


DECIMAL 


VALUE+1 


VALUE 


#VALUE 
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CHECK MODE 


OFFSET NEGATIVE? 


SIGN EXTEND 
RDD TO SP 


SAVE RESULT 


CHECK IF MAX SP 


CHECK LSB 

SAVE NEW MAX 
CHECK PROTECTION 
RESET PC 

POINT TO STRING 


PRINT IT 
RETURN 


PRINT CR & LF 
POINT TO MAX 
PRINT IT 


CHECK TERM 


GET ADDRESS 
SRVE ADDRESS 
SET FLAG BYTE 
RETURN 


SAVE VALUE 


CLEAR FLAG 
POINT TO VALUE 
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5726 7E 42 DS 


S729 
S72c 
S72F 
S734 
5734 
S?°36 
5739 
573B 
S73E 
5748 
3743 
S745 
3748 
574A 
S74D 
S74F 
37352 
S753 
5756 
5758 
5758 
S7S5E 
5768 
5763 
5766 
5769 
5768 
S?76E 
S?70 
S773 
S775 
S778 
S?7A 
5S?7?7D 
S?7F 
5782 
5783 
5786 
5789 
5S7SB 
S78E 
S78F 
5792 


94 
64 


9B 


67 


9D 


58 


AS 


Sc 


77 


DS 


7a 


RG 


ras) 


7D 


DS 
7B 


ego 


DS 


* PRINT 


MACH 


MACH2 
MACH4 


MACHE6 


* 


* PRINT ON OR 


* 


JMP 


OUTDEC 


PRINT 


MACHINE CONFIGURATION 


JSR 
LDX 
BSR 
LDA 
BSR 
LDX 
BSR 
LDA 
BSR 
LDX 
BSR 
LDA 
BSR 
LDX 
BSR 
LDX 
CLR 
JSR 
BRA 
JMP 
LDX 
BSR 
LDX 
JSR 
LDX 
BSR 
LDA 
BSR 
LDX 
BSR 
LDA 
BSR 
LDX 
BSR 
LDX 
CLR 
JSR 
LDX 
BSR 
LD 
CLR 
JSR 
BRA 


PCRLF 
#XMIM 
MACH2 
MODE 
SINDEC 
#XMT 
MACH2 
TRCF 
SINDEC 
#NST 
MACHe 
NSTRP 
SINDEC 
#XVST 
MACH2 
#MAXC 


OUTDEC 
MACH4 
PDATAL 
#SPST 
MACH2 
#END 
OUTADR 
#XMIT 
MACH2 
ITRF 
PRONF 
HAMAT 
MACH2 
SFRT 
PRONF 
#XMIRQ 
MACHe 
#IRQC 


OUTDEC 
#XMNMI 
MACH2 
#NMIC 


OUTDEC 
FLAGS 


OFF STATUS 


PRINT 
POINT 
PRINT 
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NUMBER 


CR & LF 
TO M STR 
IT 


GET MODE 


PRINT 
PRINT 


PRINT 


PRINT 


PRINT 
PRINT 


PRINT 


PRINT 
PRINT 


PRINT 
PRINT 


PRINT 


RETUR 


IT 
TRACE VALUE 


NEST VALUE 


INSTRUCTION COUNT 


STRING 
STOP ADDRESS 


I TRAP STATE 


ON/OFF 
“FR TRAP STATE 


ON/OFF 
IRQ COUNT 


NMI COUNT 


N TO EXEC 
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5794 27 85 PRONF BEQ PRONFe 

S796 CE S93 81 ~ OX #XONST PRINT ON 
S799 26 BD BRA MACH2 

579B CE 59 84 PRONF2 LDX #XOFST PRINT OFF 
S79E 20 BS BRA MACH2 


* CLERR MESSAGE TRBLE 


S7A@ CE 3F 860 CLM LDX #MSGTB POINT TO TABLE 
S7A3 FF 48 B6 STX NXTMSG SAVE POINTER 
S7A6 20 EA BRA MACH6 


* COMMAND TABLE 


S7A8 COMTBL EQU * 

S?7AS 41 Fcc “ASM” 
S7AB 8@ FCB a 

S7AC S3 SF FDB DORSM 
S7RE 42 FCC 7B’ 
S7AF 08 FCB a 

S7BO 4F B? FDB BRK 
S7Be 42 FCC “BOUNDS * 
5S7B8 88 FCB 8 

S7B9 40 85 FDB BOUNDS 
S7BB 42 FCC “BP” 
S?7BD 00 FCB i) 

S7BE S2@ 85 FDB PBP 
S7C@ 43 FCC “CALC” 
S7C4 80 FCB s) 

S7C5S Se BE FOB CALC 
S7C? 43 FCC *CLB’ 
S7CR 88 FCB i) 

S7CB 52 2D FDB CLB 
S’rCD 43 FCC “CLH’ 
S7D9 88 FCB 3) 

S7b1 Se 49 FDB CLH 
S7D3 43 FCC “CLM” 
S7Dé& 68 FCB i) 

S7D? S? AS FDB CLM 
S?7D9 43 FCC “CLP” 
S7DC 86 FCB 2) 

S7DD 54 DS FDB CLP 
S7DF 44 FCC “pIs’ 
Sr7E2 88 FCS 8 

S7E3 4E SE FOB DIS 
S7ES 44 FCC “DEPTH 
S7ER 88 FCB Vi) 

S7EB 56 FD FDB DEPTH 
S7ED 44 FCC “DELRAY” 
S7rFe 98 FCB 8 

S7F3 S2 8c FDB SDELY 


S7FS 44 FCC “DUMP ” 
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S7TF9 
S?FA 
S7FC 
58068 
5801 
5803 
5867 
58a8 
586A 
S8GE 
SSOF 
5811 
5815 
5816 
5818 
S81A 
5818 
S81D 
See1 
5822 
5824 
S827 
5828 
S8enr 
S82eeE 
S8er 
S831 
5834 
S835 
5837 
S83C 
983D 
S83F 
5843 
5844 
5846 
3849 
S84A 
S84C 
5850 
S851 
5853 
5857 
58538 
385A 
S8S5E 
SSSF 
5861 
5864 
5865 
5867 
586B 
S86C 
S86E 


1F 


9C 


AS 


28 


a3 


3F 


7F 


97 


41 


RS 


C3 


46 


DE 


29 


72 


33 


BS 


Fg 


FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FOB 
Fcc 
FCB 
FDS 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCS 
FOB 
FCC 
FCB 
FOB 
FCC 
FCB 
FOB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FOB 
FCC 


DUMP 
“EXIT ’ 


WARMS 
“FIND “ 


FIND 
“FILL” 


FILL 
“FLAG” 


FLAG 
“GO’ 
GO 
“HIST” 


HIST 
“ IND“ 


SIND 
“INST” 


INST 
“IRQ’ 


SIRQ 
“ITRAP’ 


ITRAP 
“ JUMP ” 


JUMP 
“MEM“ 


“MEM 
“MACH “ 


MACH 
“MODE ” 


CMODE 
“NEST” 


NEST 
“NMI ~’ 


SNMI 
“PROT” 


PROT 
“PAST* 
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5872 00 
5873 4C 8c 
5875 Se 
5878 00 
5873 48 BC 
587B S32 
5888 88 
5881 41 1B 
5883 Se 
5886 @@ 
S88? 4E SC 
5889 Se 
S88B 8a 
588c S56 36 
S88E 53 
5891 88 
5892 4F 48 
5894 53 
5897 88 
S898 Se SE 
S89A 53 
S89F 82a 
S8AQ 44 71 
SsAe 53 
SBA? 06 
S8A8 53 3B 
S8AA 33 
S8B@ 808 
S8Bi S2 7A 
S8B3 53 
S8Br 82 
58688 48 E6 
S8BA SZ 
S8BE 60 
SSBF 4E CD 
S8ci 54 
S8Cé& 88 
Sec? 4E Ce 
S8c? 54 
S8CE 68 
S8CF 4C 7E 
S8p1 54 
S8D5 89 
S806 Se S57 
5808 58 
Seb9 @@ 
S8DA 33 89 
S8o0c 5s 
S8DF 88 
S8EO 4E 46 
S8E2 68 


FCB 
FOB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FD8 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FOB 
FCC 
FCB 
FOB 
FCC 
FCB 
FOB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCC 
FCB 
FOB 
FCC 
FCB 
FDB 
FCC 
FCB 
FDB 
FCB 
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Q 

PAST 
“REG” 

8 

DREG 
“RESET” 
@ 

COLD 
“RET” 

i) 

RTRN 
“RT*% 

@ 

RT 
“SET” 

2) 

SET 
“SIM” 

a) 

CSIM 
“START” 
a) 

SIMUL 
“STACK” 


a 

PSTK 
“STATES” 
8 
PSTAT 
“STEP” 
) 

Sssm 
“STOP ’ 
Q 

SSTOP 
“TRACE” 
9 

STRAC 
“TRAIL ” 


@ 


TRAIL 
“TSIM” 
) 
TCSIM 
“x- 

1) 
DpopOS 
“XFR*“ 


8 


STXFR 
@ END TABLE 


* DECIMAL CONSTANT TABLE 


63 
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S8E3 
S8ES 
S8E7 
S8E9 


SSF9 
S8FB 
S8FD 
SSFF 
5981 
S903 
59305 


5907 
5969 
596B 
5980 
S9OF 
S911 
S913 
S915 
S917 
S919 
5318 
S910 
S9OLF 
5924 
5923 


5924 
59eC 
39:34 


53 


88 


SD 


SE 


8c 


99 


91 


8F 


CONTBL FDB 
FDB 
FOB 
FDB 


TSC ASSEMBLER PAGE 


16000 CONSTANTS 
16069 

188 

19 


* FUNCTION TABLE 


FUNTAB FDB 
FDB 
FDB 
FDB 
FDB 
FDB 
FDB 


PBSR 
PIMP 
PJSR 
PSUBR 
PRTI 
PSWI 
PWATI 


* REGISTER POINTER TABLE 


RGTRB FDB 
FDB 
FOB 
FDB 
FDB 
FDB 
FDB 


* 


* REGISTER TABLE 


* 


RGT FCB 
FOB 
FCB 
FDB 
FCB 
FDB 
FCB 
FDB 
FCB 
FDB 
FCB 
FDB 
FCB 
FDB 
FCB 


* 
* TYPE TABLE 
* 


TYPTB FCB 
FCB 
FCB 


* STRINGS 


“ALL 
AR 
“Bol 
BR 
“Co 1 
cc 
“NA 
NESTC 
“Ss. e2 
SP 
“x2 
xR 
“P. 2 
PC 
8 


“S.4, °R, 2, °T, 4. °U,8 
“Z, $10. “H. $20, °M, $40. “J. $80 
3) 


64 
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5935 eA PRMPT 
S937 84 

5938 20 CLCP 
S93AR O4 

5938 57 WHATST 
5940 04 

5941 43 CccsT 
5943 64 

53944 20 AST 
S947 84 

5948 22 BST 
594B 64 

S94C 20 xST 
S94F 64 

5958 20 SPST 
5953 64 

5954 28 PCST 
S957 04 

S958 26 NST 
S95B 04 

S95C 20 SYST 
SOSF 64 

5968 20 FMST 
S963 64 

5964 4D XMM 
S966 04 

5967 20 RMT 
S96R 04 

596B 26 xMIT 
S96F @4 

5976 20 xMXT 
5974 64 

S975 28 XMIRQ 
S97A 84 
~597B 26 *xMNMI 
5980 @4 

S981 4F xONST 
5983 84 

5984 4F xOFST 
5987 64 

5988 20 INPST 
S98C 64 

S98D 28 DUTST 
9992 84 

S993 ec IXST 
5995 04 

S996 3F DELST 
5998 64 

5999 @D OA CRLFST 
SISF S3 STST 
S9IA8 84 

S9AS 22 STPST 


S9B3 04 


FCC 


FCB 
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SA SARP SRP NA SA LCRA 


VA NA 
= 
u 
x 


, A 
H - 
- tt 
u ‘ 
‘N 


SA NAR NA 
La x 
a + 
[2] a 
u aS 
x 


$DGA. B, 4 
“STATES = ” 
4 

¢ "STOP" RT ¢ 
4 


65 
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59B4 49 CTST 
59C2 a4 ; 
59C3 49 ILOPST 
5905 04 

59D6 49 ITRST 
59E9 O04 

59E1 4C TRST 
SSEF @4 

59F@ 53 SYNST 
59FC 64 

59FD 45 EXPST 
5AB8 a4 

5Aa9 57 WPST 
5A14 a4 

5A15 45 MMPLST 
5R25 o4 

5Ae6 52 MMP2ST 
5A37 O04 

5A38 53 MSPST 
5A43 a4 

5A44 54 TBLOV 
5A52 a4 

5A53 57 WPRST 
5A58 a4 

5A59 45 xPST 
5A69 84 

5SA61 4D MPST 
SAG? 04 

5A68 53 SMPST 
SA79 a4 

SA71 29 PRTSTR 
SA7C 04 

SA?D 4E NSTST 
SASS a4 

SASS 52 NERST 
5A9B a4 

S5ASC 52 RTADS 
5SAA5 04 

SARS 4E NORTS 
SAB5S 64 

5SAB6 58 XFRST 
5AC2 84 

SAC3 4F BOVST 
SACB a4 

SACC 4D HMONS 
SAD? 04 

SADS 4F OPHST 
SAEZ 64 

SRE4 20 DSHST 
SAE7 94 


* 


FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
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‘IC TIMEOUT AT ” 
4 

“ILLEGAL OPCODE AT “ 
4 

“I TRAP AT “ 

4 

“LAST XFR FROM * 

4 

“SYNTAX ERROR’ 

4 

“EP TRAP AT ¢ 

4 

“WP TRAP AT ¢ 

4. 

“EX - MP TRAP AT ¢ 
4 

“REF - MP TRAP AT ” 
4 

“SP TRAP AT 

4 

“TABLE OVERFLOW’ 

4 

“WRITE” 

4 

“EXECUTE” 

4 

“MEMORY” 

4 

“SIMULATE” 

4 

* PROTECTION’ 

4 

“NC TRAP AT ¢ 

4 

“RTS IN LEVEL @ AT 
4 

“RETURN = ° 

4 

“NEST LEVEL IS 0° 
4 

“MFR TRAP AT ” 

4 

“ OVERFLOW’ 

4 

“MON XFR AT ” 

4 

“OP HALT AT ” 

4 


¢ 


4 


¢ 


* MNEMONIC AND INFO TABLE 


* 
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5BO8 


S888 
SBO3 
SBO4 
SBO? 
SB68 
SBOB 
SBec 
SBQF 
SB1i8 
5813 
5B14 
SBL7 
5Bi8 
5B1B 
SBic 
SB1LF 
56828 
S5be3 
SBe4 
5Be7 


OPTAB 


ORG 


FCC 
FCB 
Fcc 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 


FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 


FCC 


$5B98 


7 eek 7 
ae 
“NOP“ 
$12 
0 Mek 7 
ae 
tt 


7 oe Hooke 7 
68 

7 eek & 
i ) 
“TAP” 
$12 
“TPA” 
$12 
“INX~ 
$14 
*DEX* 
$14 
“CLY” 
$12 
“SEV” 
$12 
“CLC’ 
$12 
“SEC” 
$12 
“CLI” 
$12 
“SEI” 
$12 

“ SBA’ 
$12 
“CBA’ 
$12 

7 Wok * 
oo 

7 meat ote 7 
8a 

7 etek 7 
a) 

7 Heke 7 
ls) 
“TAB” 
$12 
“TBR” 
$12 

7 rere ake “ 
bl) 
“DAR” 


$18 


TSC ASSEMBLER PAGE 


67 


TSC DEBUG PACKAGE 


5B67 
SB68 
SB6B 
SB6C 
SB6F 
5B7a 
SB73 
SB7r4 
‘SB7?7 
SB78 
SB7B 
SB’rCc 
SBF 
5888 
5B83 
5B84 
SB87 
SBes 
SB8B 
SBSc 
SB8F 
SB98 
5B93 
SB94 
SB9?7 
S898 
SB9B 
SB9C 
SBIF 
SBAG 
IBA 
SBAd 
SBA 
SBAS 
SBAB 
SBAC 
SBAF 
SBBG 
SBB3 
SBB4 
SBB7 
5888 
SBBB 
SBBC 
SBBF 
SBCO 
SBC3 
SBC4 
SBC? 
SBCs 
SBCB 
SBCC 
SCCF 
SBOa 


FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 


$12 

? Medea 7 
98 
“ABR 
$12 

7 sesteate 7 
ao 

7 steteate 
98 

7 eoteote 4 
86 

7 sede ate 7 
6a 
“BRA 
$24 

7 steateate 7 
88 
“BHI 
$24 
“BLS” 
$24 
“BCC” 
$24 
“BCS” 
$24 

“ BNE“ 
$24 
“BEQ’ 
$24 
“BYC~’ 
$24 
“BYS” 
$24 
“BPL’ 
$e4 
“BMI ~< 
$24 
“BGE* 
$24 
“BLT” 
$24 
“BGT’ 
$24 
“BLE” 
$24 
“TSX- 
$14 
“INS” 
$14 


-“PUL* 


$14 
“PUL” 
$14 
‘DES’ 


$20 


$30 
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SBD3 
SBD4 
SBD? 
SBB8 
SBDB 
SBDC 
SBDF 
SBEQ 
SBE3 
SBE4 
SBE? 
SBE8 
SBEB 
SBEC 
SBEF 
SBFO 
SBFS3 
SBF4 
SBF? 
SBFS 
SBFB 
SBFC 
SBFF 
SCBe 
5C83 
Sco4 
SCe? 
SCes 
SC@B 
Scec 
SCOF 
5C10 
SC1i3 
5C14 
SCL? 
5C18 
SC1iB 
Scic 
SCLF 
Sceo 
Sce3 
5Cc24 
Sce7 
9C28 
SC2B 
scec 
SC2F 
5C39 
5C33 
SC34 
SC37 
SC38 
5cC38 
Sc3c 


FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 


FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 


$14 
“TXS” 
$14 
“PSH” 
$14 
“PSH’ 
$14 
7 se steak 7 


“RTS’ 
$15 

7 ae ook 7 
28 
“RTI? 
$1A 

7 Meee 7 
1) 

7 te oteate 7 
28 
“WAI” 
$19 
“SWI’ 
$1iC 
“NEG” 
$12 

7 Mere © 
80 

7 Mek 7 
808 
“com” 
$12 
“LSR*“ 
$12 

7 deat ake 7 
88 
“ROR 
$12 
“ASR~“ 
$12 
“ASL” 
$12 
“ROL” 
$12 
“DEC” 
$12 

7 ene 7 
1) 
“INC” 
$12 
“TST” 
$12 

o sete 
el) 
“CLR 


$46 
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SC3F 
S5C4a 
SC43 
5C44 
SC47 
5C48 
SC4B 
SC4C 
SC4F 
SCS0 
SC53 
SCc54 
SCS? 
59C38 
SC5B 
scsc 
SCSF 
SC69 
5c63 
SC64 
SC67 
5c68 
SC6B 
Scé6C 
SC6F 
SC78 
5C73 
SC?74 
SC7? 
2C78 
SC7B 
SC7C 
SCVF 
5C88 
SC83 
5C84 
SC8?7 
SC&s 
SCSB 
Scsc 
SCSF 
5C98 
SC93 
SC94 
SC9? 
Sc98 
SC9B 
scoc 
SCOF 
SCAB 
SCAS 
SCA4 
SCA7 
SCAs 


FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 


$12 
“NEG” 
$12 

7 seo te 7 
t's) 

7 seote te + 
a0 
“COM’ 
$12 
“LSR*“ 
$12 

¢ sak © 
90 
“ROR’ 
$12 
“ASR’ 
$12 
“ASL ’ 
$12 
“ROL” 
$12 
“DEC” 
$12 

0 meee 7 
1) 
“INC” 
$12 
“TST” 
$12 

7 tert 7 
0a 
“CLR” 
$12 
“NEG“ 
$27 

4 steokik 7 
Ba 

7 seta 7 
88 
“com? 
$27 
“LSR’ 
$27 

7 steak 7 
86 
“ROR”? 


“ASR~“ 
$27 
“ASL” 
$27 
“ROL” 
#27 
“DEC” 


$58 


$60 
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SCAB 
SCAC 
SCAF 
SCBO 
SCB3 
SCB4 
SCB? 
SCB8 
SCBB 
SCBC 
SCBF 
scce 
scc3 
SCC4 
SCC? 
ScC8 
SCCB 
sccc 
SCCF 
SCD 
SCD3 
SCD4 
Sco? 
SCDS 
SCDB 


$27 

7 serene 7 
88 
“INC’ 
$27 
“TST” 
$27 
“IMP” 
$24 
“CLR*’ 


“NEG” 
$36 

7 Here ak 7 
88 

7 teak 7 
ae 
“com” 
$36 
“LSR* 
$36 

7 seat 7 
86 
“ROR 
$36 
“ASR’ 
$36 
“ASL” 
$36 
“ROL” 
$36 
“DEC” 
$36 

7 ste otenk 7 
a0 
“INC” 
$36 
“TST” 
$36 
“IMP” 
$33 
“CLR* 
$36 
“SUB” 
$22 
“CMP” 
$22 
“SBC” 
$22 

7 Meter 7 
88 
“AND’ 
$22 
“BIT” 


$78 


$80 
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SDL7 
5018 
3D1B 
SBiLc 
SDLF 
Sbd2a 
Sbe3 
Sb24 
Sd27 
5Des8 
SD2B 
Sbec 
SDer 
5D38 
5D33 
5034 
SD37 
5038 
SD3B 
5D3C 
SD3F 
5D48 
SD43 
5044 
SD47 
SD48 
SD4B 
SB4C 
SD4F 
SD5@ 
SB5S3 
SD54 
SD57 
SD58 
SDSB 
SDSC 
SDSF 
5D6a 
5B63 
53D64 
SD67 
5D68 
SD6B 
SO6C 
SD6F 
SD7O8 
Sb73 
SD74 
SD7? 
SD78 
SD78 
SD7C 
SD7F 
5D89 


FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 


$22 
“LDA? 
$22 

7 sence 7 
8e 

“ EOR* 
$22 
“ADC? 
$22 
“ORA’ 
$22 

“ ADD“ 
$22 
“CPK~ 
$33 

“ BSR“ 
$28 
“LDS“ 
$33 

7 ok 
88 

“ SUB’ 
$23 

“ CMP’ 
$23 
“SBC’ 
$23 

7 steak 
@@ 
“AND “ 
$23 
“BIT” 
#23 
“LDA’ 
$23 
“STAY 
$24 
“EOR’ 
$23 
“ADC? 
$23 
“ORA’ 
$23 
“ADD’ 
$23 
“CPK~ 
$24 

7 mete 7 
@e 
“LDS” 
$24 
“SsTS’ 
$25 

“ SUB“ 


$98 


AB 
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SD83 
S084 
S08? 
5088 
SDSB 
Sosc 
SD8F 
SD90 
SD93 
SD94 
S097 
SB98 
SD9B 
SB9C 
SO9F 
SBAO 
SDAS 
SDA 
SDA? 
SDAS 
SDAB 
SDAC 
SDAF 
SDB 
SOB3 
SDB4 
SDB? 
SDBS 
SDBB 
SOBC 
SOBF 
SDC 
SDC3 
SoC4 
SoC? 
SDC8 
SDCB 
Socc 
SDCF 
SDDS 
SBDS 
SDD4 
SDD7 
SDDS 
SODB 
SODC 
SDODF 
SDE@ 
SDES 
SDE4 
SDE? 
SDES 
SDEB 
SDEC 


FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 


FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 


$25 
“CMP ’ 
$25 
“SBC’ 
$25 

7 eate ake 7 
a 
“IND “ 
$25 
“BIT? 
$25 
“LDA’ 
$25 
“STA’ 
$26 
“EOR’ 
$25 
“ADC” 
$25 
“ORA’ 
$25 
“ADD ’ 
$25 
“CPX? 
$26 
“ISR’ 
$28 
“LDS“ 
$26 
“STS- 
$27 
SUB’ 
$34 
“CMP” 
$34 
“SBC’ 
$34 

7 dete 7 
ae 
“AND” 
$34 
“BIT” 
$34 
“LORY 
$34 
“STR’ 
$35 
“EOR’ 
$34 
ADC’ 
$34 
“ORA’ 
$34 
“ADD ~ 


$B 
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SOEF 
SDOF@ 
SDF3 
SDF 4 
SDF? 
SOFS 
SDFB 
SDBFC 
SDFF 
SEG 
SE@3 


FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 


FCC 


FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 


$34 
“CPK- 
$35 
“JISR* 
$39 
“LDS” 
$35 
“STS” 
$36 

“ SUB’ 
$22 
“CMP” 
$22 
“SBC” 
$22 

7 eek 7 
08 
“AND < 
$22 
“BIT’ 
$22 
“LDA’ 
$22 

7 ste otek 7 
68 
“EOR’ 
$22 
“ADC” 
$22 
“ORA* 
$22 

? ADD ea 
$22 

7 seo © 
88 

* steak © 
96 
“LDXK* 
$33 

7 ste otek 7 
Be 
“SUB” 
$23 
“CMP” 
$23 
“SBC * 
$23 

7 Meee 7 
68 
“AND” 
$23 
“BIT” 
$23 
“LDA” 


$C9 


£00 
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SESF 
SE98 
SE93 
SE94 
SE9? 
SE98 
SE9B 
SE9C 
SESF 
SEAG 
SEAS 
SEA4 
SER? 
SEAS 
SERB 
SEAC 
SEAF 
SEBO 
SEBS 
SEB4 
SEB? 
SEBS 
SEBB 
SEBC 
SEBF 
SEC® 
SECS 
SEC4 


FCB 
FCC 
FCB 
Fcc 


FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 


$23 
*STA’ 
$24 
“EOR’ 
$23 
“ADC” 
$23 
“ORA’ 
$23 
“ADD ’ 
$23 

? teak 7 
CY) 

7 se atc ote 7 
ae 
“LDX~ 
$24 
“STX’ 
$25 
SUB’ 
$25 
CMP’ 
$25 
SBC’ 
$25 

7 week ” 
2a 
“AND? 
$25 
*BIT’ 
$25 
“LDA’ 
$25 
“STAY 
$26 
“EOR’ 
$25 
“ADC” 
$25 
“ORA’ 
$25 
“ADD’ 
$25 

7 ste rte ake ~ 
a8 

7 Heokek 7 
aa 
“LDX~ 
$26 
“STX’ 
$27 

“ SUB’ 
$34 
“CMP’ 


$EB 


$FO 
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SEC? 
SECS 
SECB 
SECC 
SECF 
SEDO 
SED3 
SED4 
SED? 
SED8 
SEDB 
SEDC 
SEDF 
SEER 
SEES 
SEE4 
SEE? 
SEES 
SEEB 
SEEC 
SEEF 
SEF@ 
SEFS 
SEF 4 
SEF? 
SEFS 
SEFB 
SEFC 
SEFF 


SFO 
SFO1 
SF @2 
SFOS 
SFB4 
SFOS 
SF BEB 
SF@7 
SF@e 
SF@9 
SFOR 
SFOB 
SFOC 
SF@D 
SF@E 
SF GF 
SF19 
SF1ia 
SFie 
SF13 
SF1i4 
SF15 


FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
Fcc 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 
FCC 
FCB 


* SECONDARY 


AUXTAB 


FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$34 
“SBC * 
$34 

7 seo 4 
96 
“AND * 
$34 
“BIT’ 
$34 
“LDA? 
$34 
“STR? 
$35 
“EOR’ 
$34 
“ADC’ 
$34 
“ORA’ 
$34 
“ADD’ 
$34 

0 den ak 7 
38 

” sok ¢ 
Ba 
“LD? 
$35 
“STK 
$36 


INFO TABLE 


$96 
$50 
$09 
$06 
$08 
$@0 
$50 
#50 
$50 
$50 
$38 
$50 
$50 
$358 
$59 
$59 
$50 
$50 
$00 
$00 
$06 
#60 


$88 


$18 
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SF16 
SF17 
SF1i8 
SFi3 
SF1A 
SF1B 
SFic 
SF1ib 
SFLE 
SFAiF 
SF2o0 
SFet 
SF2e2 
SFe3 
SFe4 
SFe5 
SF26 
SFe? 
SFes 
SF29 
SF2A 
SFeB 
SFec 
SF2D 
SF2E 
SF er 
SF3O 
SF31 
SF3e2 
SF33 


FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


FCB 
FCB 


FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


FCB 


$50 
$50 
$80 
$5a 
$20 
$50 
$00 


$00 
$00 


$00 
$63 
$63 
$63 
$63 
$63 
$63 
$63 
$63 
$63 
$63 
$63 
$63 
$63 
$63 
$50 


$351 
$52 
$50 
$50 
$D1 
$de 
$60 
$57 
$00 
$358 
$00 
$00 
$SA 
$59 
$51 
$00 
$00 
$51 
$51 
$08 
$51 
$51 
$51 
$51 
$51 
$00 


$28 


$38 


$49 
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SF4cC 31 FCB ~ $51 
SF4D Si FCB $51 
SF4E 88 FCB $86 
SF4F Si FCB $541 
SFS8 Se FCB $52 $50 
SFS1 6@ FCB $0G 
SFSe oa FCB $00 
SFS3 Se FCB $52 
SF54 52 FCB $52 
SFSS 0@ FCB $00 
SFS56 52 FCB $52 
SFS? S52 FCB $52 
SFS8 5é FCB $52 
SFS9 52 FCB $52 
SFSA Se FCB $52 
SF5S8 68 FCB $60 
SFSC 52 FCB $52 
SFSO 52 FCB $52 
SFSE 66 FCB $69 
SFSF S52 FCB $52 
SF6e Ba FCB $BO $60 
SF61 68 FCB $08 
SF62 88 FCB $68 
SF63 B@ FCB $B 
SF64 BS FCB $BO 
SF65 80 FCB $39 
SF66 BoB FCB $Bo 
SF6? BS FCB $BB 
SF68 Ba FCB $B9 
SF69 BB FCB BO 
SF6A BS FCB $Ba 
SF6B 08 FCB $68 
SF6C BG FCB BO 
SF6D 39 FCB $39 
SF6E 35 FCB $35 
SF6F Ba FCB $BO 
SF78 CB FCB $CO $72 
SF71 88 FCB $06 
SF72 @@ FCB #00 
SF73 C@ FCB CO 
SF74 CO FCB $CG 
SF75 89 FCB $38 
SF76 CB FCB $C@ 
SF7? Ca FCB $CO 
SF7s Ce FCB $CB 
SF79 CO FCB $C@ 
SF7A CO FCB $CO 
SF7B 88 FCB $00 
SFrc Ce FCB $CO 
SF7D 48 FCB $40 
SF7E 45 FCB $45 
SF?7F Ca FCB $C@ 
SF8@ 11 FCB $41 #88 


SF81 11 FCB #411 
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SFB6 
SFB? 


FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCS 
FCB 
FCB 
FCB 
FCB 


FCB 


FCB 
FCB 
FCB 
FCB 
FCB 


$11 
$68 
$11 
$11 
$11 
$00 
$11 


. $14 


$11 
$11 
$18 
$64 
$18 
$06 
$21 
$21 
$21 
$00 
$21 
$21 
$21 


$AL 


$21 
$21 
$21 
$21 


$20 
$20 
$A 
$34 
$34 
$34. 
$20 
$34 
$34 
$34 
$B1 
$34 
$341 
$34 
$31 
$30 
$36 
$30 
$B0 
$41 
$44 
$44 
$00 
$44 
$41 
$44 
$C1 


$98 


$RB 


$Ba 
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FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCe 
FCB 
FCB 
FCB 
FCB 
FCE 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


$41 
$41 
$41 
$41 
$40 
$46 
$42 
$CO 
$12 
$12 
#12 
$a 
$12 
$12 
$12 
$00 
$12 
$12 
$12 
$12 
$90 
$80 
$10 
$88 
$22 
$22 
$22 
$08 
$22 
$22 
$22 
$A2 
$22 
$22 
$22 
$22 
$09 
$06 
$29 
$RB 
$32 
$32 
$32 
$00 
$32 
$32 
$32 
$B2 
$32 
$32 
$32 
$32 
$60 
$60 


$CB 


$00 


FEO 
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SFEE 
SFEF 
SFF@ 
SFFL 
SFF2 
SFF3 
SFF4 
SFFS 
SFF6 
SFF? 
SFFS 
SFF9 
SFFA 
SFFB 
SFFC 
SFFD 
SFFE 
SFFF 


3C80 


3CO8 
3009 
3F 88 
3FB0 


3F2e | 


3F 48 
3F68 
3F8O 
3FAQ 


FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 
FCB 


ORG 


$38 
$BO 
$42 
$42 
$42 
$00 
$42 
$42 
$42 
$C2 
$42 
$42 
$42. 
$42 
$69 
$08 
$40 
$C@ 


$3CGO 


* BREAKPOINT TABLE 


BPTAB 
STRTPC 
ENDPC 
SMTAB 
EXTAB 
WPTAB 
MTAB 
MSGTB 
USER 


NO ERRORCS) DETECTED 


RMB 
RMB 
EQU 
RMB 
RMB 
RMB 
RMB 
RMB 
EQU 


END 


256 
512 


$FO 
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SYMBOL TABLE: 


ACIA 410F ADDBX 4420 RDDBXKe 443B AR 488D ASML S38A 
RSMLS S301 RSML35 S3CB8 ASML4 53CE ASMLS S3F1 ASML& S3F5 
ASML63 5402 ASML6S 5404 ASML? 5407 RSML?’S 3410 ASML77? 5423 
ASMLS 3428 AST 5944 AUXTAB SFag BELL 8807 BEXP SOF1 
BEXP2 5122 BEXP3 5125 BEXP4 513E BOUNSS 4DBB BOUNDe 4DARO 
BOUNDS 4DB8 BOUND4 40BF BOUNDS 40C3 BOUND6 4DC7 BOUND? 4DC9 
BOUNDS 4D0CE BOUNDM 4E64 BOUNDS 4085 BOUNDW 4DF4 BOUNDX 4DE4 
BOUNS 4DD4 BOYVST SAC3 BPAD 46Be2 BPCODE 4688 BPEND 4GAE 
BPPOS 46AC BPTAB 3C89 BR 408E BRK 4FB?7 BRK2 4FCA 
BRK25 4FEO BRK3 4FE6 BRK4 4FE9 BRK42 359892 BRK45 S@GE 
BRKS S011 BRKSS 5013 BRKSS 3044 BRK6 5848 BRK? S061 
BRK72 3071 BSE 4113 BSP 41411 BST 5948 BTYP 40B1 
BUFPNT 4053 BXOP 48DA BXOP2 48DD CALC S2BE CALCS S2ee6 
CRALCG SeFE CALC? 5304 CALCS 536A CALCS S322 cc 4a8C 
CCST S944 CEA 4B90 CEAR2 4BD3 CEAS 4BD9 CER4 4BDC 
CEAS 4BE2 CER6 4BE4 CFLG 48A4 CHECK 4B77 CHECK2 4888 
CHECKS 4B92 CHECK4 4B94 CHECKS 469A CHECK6 4B9C CHKSP 56C3 
CHKSP1 Sé6CD CHKSP2 S6E5 CHKSP3 SS6EB CHKSP4 S6FC CLASS 4342 
CLASS2 435A CLASS4 435F CLB Seen CLB2 5239 CLB4 5246 
CLCP 5938 CLH 5249 CLH2 S24c CLM S7AG CLP S405 
CLP1L S4DD CLPe S4E9 CLP4 S4F3 CLPS 5500 CLP6 5568 
CLP? 5518 CLPS 5516 CLRPR 417C CMOD35S 407F CMODE 4072 
CMODES 407C CMODE4 4bDs2 CNTR 4067 CNUM 5324 CNUM2 5335 
CNUM4 5338 CNUM6 = 5339 COLD 411B COLD2 4121 COLDS 41900 
COMTBL S7AS CONTBL S8E3 COUNT 4975 CR 890D CRLFST 5999 
CRSAVE 4052 CSIM S25E CSIM2 S261 CSIM4 S274 CSIM6 Se7?7 
CTST S9B4 DATPNT 4656 DCMP SiFE DCMP2 S264 DEL 4112 
DELRY 408B DELST 5996 DEPTH S6FD DIS 4ESE DISe2 4E9F 
0oIS4 $EB?7 DIS6 4ECB CoISO 4A4S DISOL 4A4B orIso2 4A59 
DISO3S 4A79 DISO3S 4A7B CISO4 4A8B DISO4S5 4A83 DISO47? 4A94 
DISOS 4AB1 DISOSS 4RBS PISO6 4AD3 DISO6?7 4AFA DISO? 4B04 
DISOsS 4BOA DORSM S35F DOASMe 5367 DORSM4 5384 DOASM6 5387 
DOCMND RAD4B pao0S S5s9 BOHB 5683 DOHB1 588s DOHB2 5@8B 
Doro 4571 DOIOIL 4¢S4F BCOIOO 455E DOTO0e 4568 DOJB Secs 
DOMB SO8E DOMB1L 5999 DOMB2 SBRO DOMB4 S@BB DOMON 4589 
DOSBUF AC14 DREG 48BC DSHST SAE4 DUMP SS1F DUMP1 5524 
DUMP2 S5erF DUMP2S 5549 DUMP2? S551 DUMPesS 3558 DUMPS S560 
DUMP6 S586 EADR 4800 EAFL 49ARe END 4073 ENDPC 3F8@ 
EQUALS 40B9 EQYAL 4CeAr EQVAL2 4C34 ESC 4114 EXEC 4195 
EXEC3 41AF EXEC6 41C2 EXEND 49C8 EXIT 4547 EXPST S9FD 
EXTRB 3F2e FILL 3628 FILL2@ S6ec FIND SSAZ3 FIND2 SSBC 
FIND3S 55C8 FIND4 S5SDC FINDS SSDF FIND6 SSE2 FIND? S611 
FINDS 561D FIRST 4063 FLAG 5708 FLAGS 5719 FLAGR 4@9E 
FLAGB 40R6 FMSCLS B403 FMST 5968 FNDM4e 5470 FNDM45 5482 
FNDMN 5436 FNOMNL S43C FNDMNe 3456 FNOMN4 5462 FNDMNS 5487 
FNOMNG S49C FNOMN? S4A? FNDOP 4885 FNDOPe 48B5 FNDOPS 48B6 
FNDOP4 48B7 FNDOPS 4868 FNDOP6 48BB FNDRE1 4F98 FNDRE2 4F9F 
FNDRE4 4FRE FNDRE6 4FB5 FNDREG 4F8C FNDTP 516C FNDTP2 S16F 
FNDTP4 5178 FNOTP6 517D FUNTAB S8EB GETCHR 41906 GETHE2 43BC 
GETHE6 43C9 GETHES 43CF GETHEX 43B5 GETRNe 4CF8 GETRNG 4CDD 
GO 443F HEQVAL 4C37 HIST S17F HIST2 5181 HIST6 5194 
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HIST? 5197 HMONS SACC ILIN 4106 ILINe@ 41C9 ILIN¢@é 41CC 
ILOPST S9C3 ILOPTR 487F INBUGS 4280 INBUF 423C INBUF2 4242 
INBUFS 4257 INBUF4 425C INBUFS 4264 INBUFS 4268 INCOD 48B8 
INDEC 43EE INDECe 43F5 INDEX 4854 INPST 5988 INRNG S1iEE 
INST 4041 INST2 4C51 INV 4107 rRaC 4870 IRQC2 407F 
TRaV 4117 ITRAP 54C3 ITRAP2 S4CF ITRAP4 54D2 ITRF 48RAB 
ITRST S906 IXST 5393 JUMP 4446 LAST 4065 LASTS 40BE 
LF 900A LINBUF 4969 LKBP 4440 LKBP3 44528 LKBP4 445E 
LKBP& 4468 LKNA4S1 41F8 LKNA42 4208 LKNASS 4218 LKNAYS 422F 
LKNAM 41D3 LKNAM2 4106 LKNAM3 4109 LKNAM4 41E6 LKNAMS 4215 
LKNAM6 4218 LKNAM? 421C LKNAMS 422A LKNAMS 4228 LSTTRM 4068 
MACH 5729 MACH2 5758 MACH4 3575B MRCH6 5792 MARKRG 4@6C 
MAXC 4077 MAXSP 4@81 MEND 428Cc MMP2ST SALS MMPeST SAZ6 
MOD 4O6F MODE 4098 MONY 4100 MPR 4B6E MPST SR61 
MSGTB <3FS8O MSPST SASS MTAB 3F69 NERST SA89 NEST 4053 
NESTC 4099 NMIC 4079 NMIC2 4878 NMIV 4119 NOBKF 4@A3 
NORTS SAAG6 NST 5958 NSTER 4ES56 NSTERe 4E59 NSTRP 4@0A5 
NSTST SA?D NXTBP 4@B4 NXTCH 4361 NXTCH2 4364 NXTCHS 4367 
NXTCH4 4379 NXTMSG 48B6 NXTPC 48C8 NXTRB S1CE NXTRB2 51D6 
NXTRB4 S1EB OHALT 4468 OLDPC 4997 OP 48D4 OP1LNG 46D5 
OPeELNG 46Ce OPSLNG 46C9 OPCNT 409A OPHST SADS OPJIMP 46D7 
OPND 4070 OPPNT 46C2 OPPNT2 40C4 OPTAB SBea OUT2SP 494D 
OUTADR 4326 OUTDE2 42D8 OUTDE4 42E7 OUTDEC 42D5 OUTDI2 42F6 
OUTDI4 4308 OUTDIS 4309 OUTDIG 431F OUTDIS 4324 OUTDIG 4eF3 
OUTHEX 4329 OUTHL 4331 OUTHR 4335 OUTHRe 433F OUTNUM 485A 
OUTSP 494F OUTST S980 OUTY 416A PADR 4AR4 PADR2 ¢AA? 
PAST 4csc PAST2 4CR2 PAST25 4CAS PAST3 4CAD PAST4 4CB4 
PASTS 4CCF PAST6 4CDA PAUSF 408A PBP S2e5 PBP2 5268 
PBP3 Se1g9 PBP4 Seer PBP6 S2enr PBPAD 5S1B6 PBPRT 4¢E32 
PBRA 473F PBRAG 4757 PBSR 4739 PBAX 4758 PBYTE ¢AAC 
PC 4893 PCRLF 4294 PCRLF2 42AD PCST 5954 PDATAL 4287 
PDATAR2 4293 PERR 4RA9 PIRQ 481D PIRQ1L 482D PIRQ2 482F 
PIRQ4 4834 PIMP 478A PIMPX 447A PJSR 477D PJSRX 479E 
PNMI 483A PNMI2 4842 POINT 485F POINT2 4@61 PONS 47D4 
PONS2 4886 POPTRB 4#@bD2 PRB45 499E PRB46 49A7 PRB47 49Be 
PRB475 498? PRB48 49C3 PRB49 49C7 PRB495 4909 PRBSS 490A 
PRBS? 49DF PRB62 49FD PRB65 4AG7 PRB68 4A17 PRB75 4A34 
PRBP 49354 PRBP1 496A PRBP2 4976 PRBP3 4987 PRBP4+ 498A 
PRBPS 49D7 PRBP6 49EE PRBP? 4Ae4 PRBPS 4A39 PRCH 4B12e 
PRCH2 4B2A PRCH3 4834 PRCH4 4840 PRCHS 4862 PRMPT 5935 
PRON 489C PRONF 5794 PRONFe 3798 PROT 4CF9 PROT2 4¢CFB 
PROT3 4D18 PROT35 4013 PROT4 4022 PROTS 4031 PROT6 40408 
PROT? 4D4D PROTS 4D57 PRRE22 49600 PRRE2@S 4918 PRREG 48C7 
PRREG2 48D1 PRREGS 4936 PRREG4 4946 PRTB 4E12 PRTB1L 4E&15 
PRTB2 4E2F PRTI 4851 PRTSTR SA?L PRYVW 4394 PSTAT S27Aa 
PSTAT4 S2sA PSTK S33B PSTKO 5347 PSTKL 534A PSTK2 S34E 
PSTRNG 4285 PSsuUBC 4765 PSUBC2 477C PSUBR 47B9 PSWI 4810 
PSWI2 4819 PSWI4 481C PUTCHR 4109 PWAL 4849 PWAI2 4848 
RELADR 48BA RGT 59387 RGTAB SSF9 RMYBP 5140 RMYBP1 5152 
RMYBPe S1S5E RMYBP4 5168 RT S636 RT2 5642 RT4 5684 
RTAD 486—A RTADS SAYC RTB S687 RTB2 S6A8 RTB4 S6BD 
RTB6 56C9 RTBF 4869 RTDAT 486C RTRN ESC RTRNL 4E80 
RTRN2 4E33 RTRN4 4586 SDELY S2sc SEIM 4897 SET 4F48 
SET2 4F4D SET4 4F64 SETS 4FS1 SET6 4FS9 SETCN S809 
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SETCN2 SOE SETCN4 SOEE SETFL 519A SETFL2 SLAF SETV 4D5D. 
SIMCNT 4087 SIMULS 4488 SIMU35 44BS SIMU4S 4406 SIMU4S 44E2 
SIMU61 4504 SIMU62 4507 SIMUG6S 450D SIMU67 4524 SIMU68 4529 
SIMU69 45eac SIMUL 4471 SIMULO 4476 SIMUL1 4479 SIMUL2 4490 
SIMULS 449E SIMUL4 44C8 SIMULS 44EC SIMUL6 44FF SIMUL? 453E 
SIND S29o7 SIND2 SeA3 SINDEC S571c SIRQ S2As8 SKPSP2 4384 
SKPSP4 438D SKPSPC 437E SMEND 48C6 SMPST SAG68 SMTAB SFOO 
SNMI SeBs SP 4091 SPC 9020 SPST 59590 SSM 4BE6 
SSM1 4BFC ssmi5 4Co@2 SSMe 4$Ce2r SSM3 4C17 SSP 4895 
SSTOP 4ECD SSTOP2 4EDC STACK 3FFF STATES 40A7 STOP 454A 
STPCNT 4685 STPST S9AI STRAC 4ECe2 STRIT 4068 STRTPC 3000 
STST S99F STXFR 4E&486 STXFRe 4E4A SWIV 4115 SYNER 41CE 
SYNST S9FQ TABE 46CE TBLOVY SA44 TCSIM 5257 TEMP 4858 
TEMPL 465C TRAIL 4C7E TROL25 4676 TRCF 4890 TRCHK 45E7 
TRCHK1 45F93 TRCHK2 45FC TRCHK4 45FF TRCHKS 4667 TRCHKS6 4615 
TRCHK? 4641 TRCOO11 45D4 TRCOO1e 4657 TRCO13 468D TRCO14 469E 
TROOLS 46AC TRCOO4S 46F9 TRCOO4? 46FE TRCOL 458E TRCOL1Z 45cC 
TRCOOL2 46Be TRCOL3 4604 TRCOL4 46F2 TRCOLS 4762 TRCRET 471A 
TRCSP1 466D TROSP2 4673 TRNEST 4E3B TRST S9E1 TSP 4083 
TSTEQ 4C50 TSTHE1 43DA TSTHE2 43E6 TSTHES 43EA TSTHE4 43EC 
TSTHEX 4304 TSTON 4C69 TSTTRM 4C63 TYPTB S924 USER 3FRO 
VALUE 45D VFLG 46A1L WRITF 4989 WAITR 42B6 WAITRLI 42BC 
WAITRe 4202 WARM 4195 WARMS 410C WARMST 4103 WHATST S93B 
WPEND 48CA WPRST SAS3 WPST SASS WPTAB 3F468 WRKHX  43A0 
WRKHX4 43A3 XFRST SABS XFRT 4BAG6 XFRTRP 4651 xMEM 4EDE 
xXMEM2 4EER XMEMS 4EED XMEM3S 4EFS XMEMS? 4F19 XMEM38S 4F2A 
XMEM4 4F3A XMEMS 4F30 XMIRQ S975 RMIT 596B xMM 5964 
XMNMI S97B xMT 5967 RMXT 59376 XOFST 5984 XONST 5981 
XPST SAS? xR 488F XSAVE 4058 xXST 594C XVYST S9SC 


